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! lenguaje LOGO 
fue desarrollado 
por Seymour Pa- 
per! en el Labora- 
torio de Inteligen- 
cia Artificial del JVL I. T, (Massachusetts 
Institute of Technology). Papert y su gru- 
po buscaban un sistema que resultara 
sencillo para la enseñanza del uso de 
los ordenadores. Tras varios meses de 
investigación, surgió el LOGO: un len- 
guaje moderno nacido bajo la inspira- 
ción del LISP, Este último es un lengua- 
je evolucionado, orientado a aplicacio- 
nes de inteligencia artificial, que en 
1959 vio la luz desde los propios labo- 
ratorios del M. I. T. 

Las bases conceptuales del LOGO son 
la sencillez, unida a la potencia de ope- 
ración, Otras características fundamen- 
tales del LOGO se concretan en su na- 
turaleza de lenguaje modular e interac- 
tivo. La medularidad se refleja en el he- 
cho de que el usuario del LOGO va 
creando pequeños módulos indepen- 
dientes que, a su vez, servirán de piezas 
para construir estructuras más comple- 
jas. El LOGO es un lenguaje interactivo 
en el sentido de que cualquier orden es 
procesada de inmediato, con sólo intro- 
ducirla en el ordenador. 

Debido a sus orígenes, inspirados en 
un lenguaje para el tratamiento de lis- 
tas de datos — el LISP {LISt Proces- 
sing}—, uno de ios puntos fuertes del 
LOGO reside en ¡a manipulación de lis- 
tas alfanuméricas. IMo obstante, su ca- 
racterística más espectacular hay que 
buscarla en el tratamiento de gráficos, 
tarea encomendada al sistema denomi- 
nado TURTLE GRAPHICS. 

El popular TURTLE GRAPHICS (gráfi- 
cos creados por medio de la tortuga), es 
un método fácil y divertido para la con- 
fección de dibujos. El concepto de tortu- 
ga procede de ciertos robots desarrolla- 
dos a principios de 1960. Estas máqui- 
nas consistían en un caparazón flan- 
queado por ruedas (de ahí el nombre de 
tortuga) y funcionaban asociadas a un 
ordenador. El ordenador guiaba a la tor- 
tuga y ésta iba dejando marcada la hue- 
a de su trayectoria en el suelo 
A principios de 1970 surgió la varian- 
te actual de tan simpático y útil perso- 
naje: la tortuga que evoluciona sobre la 
pantalla. La idea de guiar a una tortuga 
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El lenguaje de la 
escuela 
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Tras el BASIC, el LOGO es el lenguaje más popularizado en el terreno de los 
equipos domésticos. Son muchos los ordenadores personales de esta 
categoría que disponen de un intérprete del lenguaje LOGO. 



a través de la pantalla de visualización, 
ha sido adoptada por otros muchos len- 
guajes para resolver el aspecto de crea- 
ción de presentaciones gráficas. Junto a 
las posibilidades gráficas, el LOGO 
aporta un potente lenguaje de progra- 
mación de tareas, fácil de aprender y 
edificado a partir de un vocabulario y 



unas estructuras simples y versátiles. 
La sencillez inherente al empleo del 
LOGO, han convertido a este lenguaje 
en idóneo para labores pedagógicas y de 
iniciación a la programación de ordena- 
dores. Los seguidores del LOGO decla- 
ran que se trata de «un lenguaje para 
aprender»; afirmación no solo aplicable 




iKtistna 



El nacimiento del LOGO tuvo fuerte inspiración en el LISP, un lenguaje 
evolucionado orientado a aplicaciones de inteligencia artificial. Dado su origen y 
sus propias características, el LOGO es un lenguaje que resulta 
adecuado en el marco de la robótica. 
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I La popular tortuga es el 
símbolo del lenguaje LOGO , 
Este simpático personaje es 
el protagonista del «Turtie 
Graphics», un método 
sencillo para la creación y 
tratamiento de dibujos. 




= si snder a programar , sino también 
.a a aprender a discurrir en base 
£ estructuras lógicas, 

Er. efecto, el LOGO es algo más que 
_n enguaje de programación; hay que 
::~:ec rio como un verdadero entorno 
a enseñanza asistida por ordena - 
Ccn este lenguaje, los niños apren- 
de - a trabajar con ordenadores como si 
h tetara de un simple juego. El secre- 
t: 'es de en Ja naturaleza interactiva del 
- t que facilita la creación y depu- 
s: de estructuras por el sistema de 

"-■sea-error. 

Ei =:en en el mercado distintas ver- 
= t es de LOGO, La mayor parte, desa- 
" : asas por fabricantes de ordenado- 



res en colaboración con el Grupo Logo 
del M. I. T. (TI, Logo, Apple Logo, Atari 
Logo, etc ). Se diferencian en muy poco, 
concretamente en abreviaturas de pala- 
bras LOGO, en la inclusión del TURTLE 
GRAPHICS y en el tratamiento de listas. 
También cabe mencionar la existencia 
de una versión en castellano del TI Logo 
(versión de Texas Instruments). 



La filosofía del LOGO 

La programación en LOGO se funda- 
menta en el empleo de procedimientos 
definidos por el usuario. Estos procedi- 
mientos son conjuntos de órdenes a los 



que se accede como si se tratara, real- 
mente, de una orden única, A su vez r ías 
órdenes estén constituidas por cadenas 
de datos, operadores y comandos. La po- 
tencia del LOGO brota de la posibilidad 
de utilizar procedimientos dentro de 
otros procedimientos. Semejante carac- 
terística, permite programar potentes 
operaciones partiendo de unidades ele- 
mentales. EJ método a seguir consiste, 
sencillamente, en construir fos procedi- 
mientos complejos a partir de la asocia- 
ción de otros procedimientos más sim- 
ples definidos con anterioridad. 

En realidad, el LOGO carece deí con- 
cepto de programa como tal, lo que se 
suple con el denominado «WORK SPA- 
CE» o espacio de trabajo. Este contiene 
los procedimientos y variantes definidos 
por el usuario; y, por supuesto, en él 
existirá, generalmente, un superproce- 
dimiento f o procedimiento principal, que 
hace uso de otros subprocedimientos. 

En un mismo espacio de trabajo pue- 
den coexistir varios superprocedimien- 
tos independientes. Esto equivale a te- 
ner varios «programas» independientes 
en la memoria central. 

Como ya se ha indicado, e! LOGO es 
un lenguaje fundamentalmente interac- 
tivo. Los mensajes de error son claros y 
concisos. Por ejemplo, si a través del te- 
clado se introduce la palabra «HOLA», 
seguida de una acción sobre la tecla RE- 
TURN (la orden para que el ordenador 
asimile el mensaje introducido), la má- 
quina responderé con un significativo: 

I DON'T KNOW HOW TO HOLA 

(¡ignoro como realizar ia acción 
HOLA í) 

Con este mensaje, el LOGO comuni- 
ca al usuario que el procedimiento 
HOLA no está definido en el espacio de 
trabajo . Si el error deriva de la omisión 
de un dato de entrada dentro de una or- 
den, el LOGO responderá esta vez con: 

NOT ENOUGHT IIMPUTS TO XXX 

(¡No hay suficentes datos de entrada 
para cursar ¡a orden XXXI) 

Otra capacidad notable del LOGO se 
manifiesta en el tratamiento de cadenas 
alfanuméricas. Sus potentes instruccio- 
nes permiten añadir, extraer y comparar 
elementos inmersos en las mismas sin 
ninguna dificultad. 





Sin lugar a dudas, la característica 
más espectacular del LOGO se encuen- 
tra en el TURTLE GRAPHICS. Un méto- 
do de dibujo que consiste en desplazar 
una tortuga a través de la pantalla; ésta 
irá creando el dibujo al dejar visible el 
rastro de su trayectoria en los sucesivos 
movimientos. Crear un dibujo se con- 
vierte, pues, en algo tan simple y diver- 
tido como guiar el desplazamiento de 
tan simpático personaje. 



Texto y dibujos en la pantalla 

Para desarrollar el conjunto de posi- 
bles actividades que brinda el LOGO, 
éste admite tres tipos o formatos de pan- 
ta lia: 




• Pantalla de texto 

• Pantalla de gráficos y 

• Pantalla partida. 

La propia denominación que recibe 
cada formato de pantalla revela su uti- 
lidad: la primera está destinada a Ja pre- 
sentación de texto, la segunda a la vi- 
sualización de gráficos y Ja tercera, de- 
nominada pantalla partida o fracciona- 
da, comparte ambas posibilidades. 

En la primera modalidad {pantalla de 
texto} no es posible ver a la tortuga y 
tampoco a los dibujos trazados con su 
colaboración. Este modo de presenta- 
ción sólo resulta adecuado para la es- 
critura de texto y suele ser el inicial, 
presente en el instante de conectar el 
ordenador. 

Para acceder a la tortuga es preciso 
cambiar a otra modalidad de pantalla; 
para ello, basta con teclear un determi- 
nado comando gráfico. El efecto de tal 
acción será el salto a la pantalla de grá- 
ficos o a la pantalla partida. 

Los comandos gráficos que permiten 
el «salto» a una nueva modalidad de 
pantalla son: FS, TS y SS. 

El primero de ellos (FS: Full Screen) 
reserva toda Ja pantalla para gráficos. Si 
se introduce algún texto después de ut«- 
¡zar el comando FS, el usuario obser- 
vará que su mensaje no aparece refle- 
jado en ningún punto de la pantalla. 

Si el comando introducido en SS (Split 
Screen), quedará seleccionada la panta- 
ia partida: el texto aparecerá en Ja par- 
re inferior de la misma, mientras que la 




Í EI LOGO es uno de los lenguajes más frecuentes en ordenadores de tipo 
doméstico . Son muchos los modelos para ¡os que existe el adecuado 
traductor de LOGO, como alternativa al intérprete BASIC habitual. 
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Estructura de una instrucción LOGO , Et comando que define la acción a realizar se nutre 
de 'os datos de salida generados por los operadores que lo acompañan. 



zona superior quedará reservada a las 
evoluciones de la tortuga. 

Ei tercero de los comandos, TS (Text 
Screen) destina toda la pantalla a la vi- 
sualizadón de texto, sin dejar resquicio 
alguno para la tortuga 

Pasando alternativamente de Fs a TS, 
pueden ir observándose las órdenes in- 
troducidas y su ejecución en modo grá- 
fico, Sin embargo, resulta más cómodo 
el uso de la pantalla partida, tai como 
tendremos ocasión de estudiar con de- 
talle en los apartados dedicados a 
TURTLE GRAPHICS. 



Comandos y operadores 

En el LOGO es muy importante el 
concepto de entrada y salida de datos. 
Imaginemos dos máquinas tragaperras, 
una de ellas expendedora de chicles y 
la otra un video-juego de «marcianos». 
En la primera, al introducir la moneda 
(dato de entrada), sale de inmediato un 
paquete de chicles (dato de salida). Por 
contra, ai introducir la moneda (dato de 



entrada) en la máquina de video-juegos, 
no cae una nave galáctica por la ranura 
inferior (no hay dato de salida). Real- 
mente, estamos otorgando Ja cualidad 
de «tangibles» a los datos de nuestro 
ejemplo, con lo cual, parece que no hay 
dato de salida en el segundo de los ca- 
sos, Pasemos ahora a la concreción del 
LOGO Para empezar, hay que tener en 
cuenta que las órdenes o instrucciones 
pueden ser de dos tipos: 

• comandos u 

• operadores 

(según la terminología propia de este 
lenguaje). 

La diferencia entre ambos tipos de 
instrucciones radica en que un coman- 
do es una orden que puede o no tener 
datos de entrada, pero que en ningún 
caso proporciona dato de salida (el 
ejemplo de la máquina de video-juegos). 
Por el contrario, el operador es una or- 
den que proporciona siempre algún dato 
de salida (la máquina expendedora de 
chicles). 

Por ejemplo, la orden FÜRWARD 5 es 



un comando: mueve la tortuga cinco es- 
pacios hacia adelante (5 es e! dato de 
entrada), pero no proporciona ningún 
dato de salida. En cambio SUM 2 3, 
suma Jos números 2 y 3 entregando el 
número 5 como resultado. Las cifras 2 
y 3 son datos de entrada, mientras que 
5 es el dato de salida. Por lo tanto, SUM 
será un operador. 

En el LOGO, fas órdenes o instruccio- 
nes deben redactarse de tal forma que 
empiecen por un comando, puesto que 
tos datos de entrada van siempre aí fi- 
nal de la instrucción. Esta condición la 
observamos en cualquier orden, por 
ejemplo: 

FORWARD 5 

En la que el comando (FORWARD: ha- 
cia adelante) precede al dato de entrada 
(5), Los datos de entrada pueden coinci- 
dir, incluso, con los datos de salida de 
un operador. En la siguiente instrucción: 

FORWARD SUM 2 3 

Se ordena a fa tortuga que avance un 



RETALLA DE TEXTO FANTALLA GRAFICA PANTALLA PARTIDA 




Las tres pantallas del LOGO: de 
texto , de gráficos y « pantalla 
partida». El salto de una a otra 
se produce con los cornados TS, 
ES o SS respectivamente. 
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número de posiciones coincidente con 
el resultado de sumar 2 y 3. Por lo tan- 
to, el dato de entrada del comando FOR- 
WARD es el dato de salida del operador 
SUM 2 3, A su vez, las entradas de SUM 
podrían coincidir con los datos de salida 
de otros operadores. En todo caso, hay 
que recordar que la primera palabra de 
!a orden o instrucción debe ser un co- 
mando; de fo contrario, se perdería el 
dato de salida generado por el operador 
que lo sigue. Veamos un ejemplo. La 
instrucción siguiente: 

SUM 284 2000 

realiza la suma de los números indica- 
dos, sin embargo, el resultado no se uti- 
liza para nada; no hay ningún comando 
al principio de la instrucción que le dé 
utilidad. En tal caso, el LOGO mostrará 
en la pantalla un mensaje de error: 



SUM 284 2000 
YOU DOMT SAY WHAT 
TO DOWITH 2284 




Un operador LOGO recibe los datos de entrada y entrega un dato de salida. Este 
dato de salida puede pasar a formar parte de los datos de entrada de 
un comando destinado a realizar una acción específica . 



{¡ No me has dicho qué debo hacer con 
ef dato de saíida 2284 fj. 



Las variables del LOGO 

Además de operadores, comandos y 
datos, existen otros elementos en las 
nstrucciones LOGO: las variables. 

De forma simple, aunque ilustrativa, 
puede considerarse a la variable como 
un compartimento capaz de contener 
datos. En toda variable hay que distin- 
guir dos partes: 

* nombre de fa variable y 

* contenido . 

El contenido es el valor del dato al- 



macenado en dicho recipiente o varia- 
ble, mientras que el nombre es la pala- 
bra que identifica a cada variable y ia 
distingue por completo de las restantes. 

Cabe suponer que las variables son 
algo semejante a los cajones de un ar- 
mario clasificador. Cada cajón tiene una 
etiqueta que sirve para identificarlo y, 
por supuesto, dentro del cajón pueden 
almacenarse distintos objetos (datos). 
En el caso que nos ocupa, cada variable 
tiene un nombre que la identifica con 



exclusividad y en ella podemos almace- 
nar muy diversos valores numéricos. 

Por lo demás, podemos acceder al 
contenido de un cajón (al dato) a través 
del nombre que lo identifica (el nombre 
de la variable). Un buen ejemplo para 
ilustrar estos conceptos lo encontramos 
en el fichero de clientes de una empre- 
sa. El ¡dentificador de cada una de las fi- 
chas coincide con el nombre del cliente 
y, desde luego, es posible consultar una 
de estas fichas para obtener informa- 




Cualquier instrucción LOGO debe empezar por un comando. St su lugar estuviera 
ocupado por un operador , la instrucción no ejecutaría una acción y se perderían 
los datos de salida de los operadores previos. 
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ción. También se puede actualizar su 
contenido, ya sea borrando, añadiendo 
o sustituyendo datos. De forma análoga, 
también es posible consultar, modificar 
o borrar a voluntad el contenido o dato 
asignado a una variable. 

Los datos de entrada incluidos en una 
orden puede definirse como el conteni- 
do de una variable, en lugar de expre- 
sarlos en forma de valor numérico fijo 
Por ejemplo: 

SUM : DATO 1 :DAT0 2 

suma el contenido de las variables 
DATO 1 y DATO 2. 

Para definir cualquier variable, es pre- 



ciso utilizar un comando al efecto: 
MAKE (hacer). 

MAKE admite dos datos de entrada: el 
primero es el nombre con el que se de- 
sea identificar a la variable, mientras 
que el segundo coincide con et dato que 
se desea almacenar en la misma. 

El nombre se puede elegir libremen- 
te, sí bien, suele utilizarse una palabra 
relacionada con la naturaleza del con- 
tenido que va a almacenarse en dicha 
variable. Por ejemplo, si una variable va 
a contener un número correspondiente 
ai sueldo que percibe un empleado, lo 
más fógico es otorgar a la variable en 
cuestión el nombre SUELDO, hay que 
precisar, que eJ nombre de la variable 



hay que introducirlo precedido por co- 
millas O. El motivo se comentará en el 
capítulo dedicado a las «palabras y lis- 
tas» del LOGO. 

El segundo dato que acompaña ai co- 
mando MAKE debe coincidir con el va- 
lor que se desea otorgar a la variable. 
Más adelante, se verá que el dato en 
cuestión puede ser de varios tipos, in- 
cluyendo la propia salida de un opera- 
dor o el contenido de otra variable. Por 
ejemplo: 

MAKE 'DIA 30 

asigna a la variable DIA el valor 30. 

A Ja hora de acceder al contenido de 




MAKE es el comando 
apropiado para definir una 
variable LOGO: debe estar 
seguido por el nombre de 
variable (precedido por 
comillas) y por el dato a 
asignar 



FORWARD 8 



FORWARD 4 



RACK 4 




I 1 1 1 1 h 1 1 1 1 1 1 1 1 1 1 1 

6 5432 1 O 1 2 345 67 8910 

I Avance y retroceso { FORWARD y BACK). Estas dos simples acciones son el punto de partida de todo un vocabulario 
■ de órdenes que instruirán a la tortuga para la confección de dibujos en pantalla. 
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LSFT 



RIGHT 



| Dos son los comandos destinados a ordenar el giro de ¡a tortuga: RIGHT (giro a ¡a derecha ) y ÍEFT ( giro a la izquierda). En 
? ambos casos , el comando correspondiente debe estar seguido por un número que exprese et ángulo de giro en grados 




I Secuencia de órdenes 
que instruyen a la tortuga 
para que dibuje un aspa. 



3 variable, bastará sencillamente con 
ndícar el nombre de la misma, precedi- 
do por el signo «dos puntos» (:). Si la ins- 
trucción al efecto la empezamos con el 
comando PRINT: 



PfiINT OIA 

al ejecutar la orden, accionando la te- 
cla RETURN, el contenido de la variable 



(DIA en nuestro caso) aparecerá escrito 
en la pantalla. El signo «dos puntos» que 
precede a Ja palabra DIA, índica al 
LOGO que se trata, precisamente, del 
nombre de una variable. 
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Traductores de lenguajes 

La comunicación entre dos personas que hablan distinto 
idioma no puede establecerse sin la colaboración de un 
traductor. Este puede ser un intérprete que realice una 
! traducción simultánea, frase a frase; o simplemente un 
traductor que escriba en el idioma del destinatario el 
texto redactado en el idioma de origen. Esta es una 
realidad trasladable al mundo de los ordenadores, 
Excepto en el caso de que el diálogo se mantenga 
utilizando el lenguaje máquina, es necesario un proceso 
de traducción para que ef programa confeccionado por 
el usuario sea inteligible para el ordenador. Por 
supuesto, la tarea de traducción no correrá a cargo de 
traductores humanos; de ello se ocuparán los 
ordenadores una vez «instruidos# al efecto, 

En cualquier proceso de traducción intervienen dos 
programas: 

* ti programa fuente, redactado en un lenguaje 
evolucionado, ensamblador o de alto nivel. 

* El programa objeto o programa resultante del proceso 
de traducción, escrito en el lenguaje propio de la 
máquina. 

"ai ocurría en la traducción de comunicaciones 
".manas, también en este caso cabe una doble 
mé\¡ dad: recurrir a un interprete o traductor 
i m . taneo, que permitirá un diálogo o comunicación 
"■eracm o utilizar los servicios de un traductor que 
f&s&ibe el contenido de la comunicación en el 
5"3usje ce! destinatario (la máquina en nuestro caso), 
-es - enies traductores humanos serán ahora 



Aprendiendo a andar 

La herramienta que brinda el LOGO 
para crear dibujos es la tortuga ; un sim- 
pático colaborador dispuesto a ejecutar 
los desplazamientos que le ordene el 
usuario. En sus evoluciones a través de 
la pantalla, ésta irá construyendo el di- 
buje ai dejar una huella visible de su 
trayectoria. En efecto, es como si el in- 
quieto personaje llevara una tiza adosa- 
da para perpetuar el rastro de sus mo- 
. trienios. No cabe duda que fa técnica 
resulta didáctica e incluso divertida, 
acemas de útil. 

mayor parte de las órdenes que en- 
- e"ie la tortuga son de tipo comando , 
S t en, también existen operadores que 
re- ejar .as condiciones en las que está 
actuando la tortuga (posición, color, 
e:: Más adelante se analizarán inclu- 

s: 5 i-r.as posibilidades avanzadas que 

ían la eficacia de esta técnica: ope- 
z ~ ¿n con varias tortugas simultánea- 









PROGRAMA 




La comunicación entre las personas 
que hablan distinto idioma no es 
posible sin la intervención de un 
traductor. Algo semejante ocurre a la 
hora de dialogar con las máquinas , 

Es preciso contar con un traductor 
que convierta al lenguaje íntimo de la 
máquina las órdenes y mensajes 
j formulados por el usuario en un 
lenguaje de alto nivel. 

programas auxiliares especializados en tal menester, y, 
de nuevo, especializados en realizar una traducción 
interactiva o demorada fdei mensaje en bloque). 

Los intépretes son los programas especializados en la 



traducción interactiva. Traducen el programa línea a 
línea, de tal forma que el ordenador las ejecuta a 
medida que va disponiendo del resultado de fa 
traducción. 

La traducción diferida corre a cargo de los denominados 
programas compiladores. Estos traducen ef programa 
fuente en bloque, obteniendo el correspondiente 
programa objeto redactado en el lenguaje de la máquina 
que debe ejecutarlo. 

De la realidad humana podemos extraer otras 
conclusiones aplicables a los programas intérpretes y 
compiladores. En principio, la utilidad del intérprete se 
manifiesta en los diálogos interactivos; de ahí que este 
tipo de traductor resulte idóneo cuando se trata de 
habilitar una comunicación inmediata con la máquina. 
Otro factor significativo es que, dado el método de 
traducción, el intérprete invertirá bastante más tiempo 
en realizar su función que un compilador. Este último 
realiza la traducción del programa en bloque, de una 
sola vez, sin aguardar a que vayan ejecutándose las 
instrucciones a medida que son traducidas. La 
característica de velocidad se inclina, pues, hacia los 
compiladores. Este es un dato extensivo al proceso de 
ejecución: fa ejecución def programa objeto, traducido 
en su integridad (compilado), es mucho más rápida que 
la ejecución línea a línea del programa interpretado (de 
tres a veinte veces más rápida}. 

La interpretación de un programa fuerte se efectúa en 
el propio ordenador que cursará su ejecución. Sin 
embargo, el compilado de un programa puede no 
realizarse en el ordenador que debe ejecutar el 
programa objeto. Es frecuente que sea un ordenador 



mente, o transormación del aspecto de 
la tortuga a base de «disfrazarla». 

Antes de empezar con el trazado de 
un dibujo, es ineludible observar el as- 
pecto de la tortuga. Es importante dis- 
tinguir la orientación de su cabeza. Este 
miembro es fundamental para el movi- 
miento, puesto que indica la dirección 
en la que se desplazará el personaje. 
Una opción útil al respecto es pasar a 
la modalidad de pantalla partida, intro- 
duciendo a través del teclado la orden 
SS. La tortuga pasará a ocupar el cen- 
tro de la pantalla Situación en Ja que 
será inmediato comprobar cuál es su 
orientación. 

En el instante inicial. Ja tortuga debe 
encontrarse mirando hacia el límite su- 
perior de la pantalla. Si su disposición 
fuera otra, será preciso llevarla al esta- 
do inicial tecleando la orden CS, 

Los desplazamientos más elementa- 
les de la tortuga son, naturalmente, los 
de avanzar o retroceder a lo largo de la 
dirección marcada por su eje longitudi- 



nal. Las órdenes que se ocuparán de 
instruirla al efecto son las siguientes: 

FORWARD; avance 

BACK: retroceso 

En ambos casos, ya sea el desplaza- 
miento hacía adelante o hacia atrás, hay 
que indicar al quelonio el número de po- 
siciones o «pasos» que debe dar antes 
de detenerse. Este número se introduci- 
rá tras el comando oportuno. 

Por ejemplo, con la orden FORWARD 
50, la tortuga se desplaza 50 posiciones 
hacia adelante, dejando impreso el ras- 
tro de su trayectoria. Si queremos que 
retroceda hasta ocupar de nuevo su po- 
sición original bastará con ordenar un 
desplazamiento hacia atrás del mismo 
número de posiciones: BACK 50. Si se 
introduce de nuevo la instrucción BACK 
50, la tortuga retrocederá hacia el bor- 
de inferior de la pantalla visualizando su 
huella. Un nuevo FORWARD 50 devol- 
verá a la tortuga al centro de la panta- 
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I I INTERPRETE DE LENGUAJE 

I I PROGRAMA EN EJECUCION 

i I COMPILADOR DE LENGUAJE 

¡■I PROCESO DE COMPILACION 

La actividad de! traductor puede 
manifestarse realizando una 
traducción simultánea de! diálogo i o 
efectuando la traducción del mensaje 
total, de una sola vez. Los programas 
traductores del primer tipo son los 
denominados «intérpretes* y los del 
I segundo « compiladores ». 



auxiliar el que se encargue de generar el programa 
objeta redactándolo en el lenguaje máquina propio del 
equipo al que vaya destinado. Terminada la compilación, 
e¡ programa puede ya introducirse y ejecutarse cuantas 
veces sea necesario en el ordenador de destino. 

Son muchos los lenguajes para los que se dispone de 
ambos tipos de traductores 
_a elección de intérprete o compilador dependerá del 
: oo de actividad que se encomiende al ordenador. Si la 
velocidad no es un factor primordial y prima la 
necesidad de mantener un diálogo interactivo, habrá 
que optar por un intérprete. Los microordenadores 
domésticos incorporan de origen un intérprete de 




COMPILADOR 



PROGRAMA 

PUENTE 




lenguaje BASIC; si bien, el fabricante suele disponer de 
un catálogo de intérpretes y compiladores, en opción, de 
otros lenguajes. 

Cuando ta característica solicitada es una alta 
velocidad de ejecución, no cabe duda en la elección: hay 
que optar por un compilador. 



Los lenguajes con una marcada inclinación hacia las 
aplicaciones interactivas (BASIC, LOGO, PILOT.,.) suelen 
utilizarse en versión compilada; mientras que los 
lenguajes más especializados, habitual mente no 
interactivos (FORTRAN, COBOL, ALGOL, FL/3...| actúan 
a través de compiladores. 



Programación y ejecución 

Los lenguajes informáticos comparten el mismo objetivo 
que los humanos: ofrecer el medio adecuado para que 
pueda establecerse una comunicación. En el caso de la 
máquina, la comunicación se concreta en «instruirla» 
para que ésta desarrolle un trabajo o realice una tarea 
específica. Aquí es donde aparece el concepto de 
programa «o secuencia ordenada de instrucciones», cuya 
puesta en práctica o ejecución resuelve un cálculo, 
efectúa un tratamiento de información o, en general, 
reatiza la tarea detallada en el programa. 

En definitiva, programar al ordenador equivale a 
confeccionar la secuencia de, instrucciones o programa, 
utilizando un lenguaje apropiado, inteligible para el 
ordenador. 

Cuando la maquina deba efectuar el conjunto de 
operaciones o tarea programada, es preciso que el 
usuario introduzca el progama en la memoria dei 
ordenador. A partir de ese instante, éste puede ordenar 
su ejecución. Ejecución que realizará el ordenador 
examinando las sucesivas instrucciones que componen 
el programa, interpretando su significado y cursando las 
órdenes y operaciones encomendadas. 
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Ha, con lo que se habrá dibujado una lí- 
nea vertical de 100 posiciones o unida- 
des de desplazamiento: 50 hacia arriba 
y otras cincuenta por debajo de la posi- 
ción original que ocupaba la tortuga. Pa- 
semos a movimientos más complejos. 
¿Es posible ordenar a 3a tortuga que 
cambie la dirección de desplazamiento? 
En efecto, basta sólo con instruirla para 
que realice el oportuno giro sobre sí 
misma. Los comandos al efecto son: 

R1GHT: derecha y 

LEFT: izquierda 

Ambos comandos deben acompañar- 
se de un dato de entrada que señale Jos 
grados del giro [recuerde que un giro de 
360 grados equivale a una vuelta com- 
pleta]. 

La orden RfGHT 90 dejará a la tortu- 
ga mirando hacia la derecha, mientras 
que un giro ordenado con LEFT 90, de- 
volverá a la tortuga a la orientación de 
partida (apuntando hacia la zona supe- 
rior de la pantalla). Supongamos que a 
partir de la posición de partida, ordena- 
mos a fa tortuga que ejecute la orden 
RIGHT 90 y tras ésta, la orden FOR- 
VVARD 50. El resultado será la aparición 
en [a pantalla de una fínea horizontal 
de 50 puntos hacia la derecha, a partir 
üei centro de la pantalla. Sí queremos 









1 es 

2 FORWARD 50 

3 BACK 100 

4 HOME 

5 RIGHT 90 

ó FORWARD 50 

7 BACK 100 

8 HOME 

9 LEFT 45 

10 FORWARD óü 

11 BACK 120 

12 HOME 

13 RIGHT 90 

14 FORWARD 60 

15 BACK 120 

16 HOME 




■ Un nuevo ejemplo lo aporta el programa adjunto, cuya ejecución hará 
que la tortuga dibuje un asterisco sobre la pantalla. 



prolongar fa línea horizontal por la iz- 
quierda, en otras cincuenta posiciones, 
será suficiente con introducir ahora la 
orden BACK 100. 

¿Cómo devolver ahora a la tortuga a 
su posición de partida? Mada más fácil; 
aunque es necesario comunicarle dos 
órdenes: FORWARD 50 {regresa al pun- 
to central) y LEFT 90 (gira noventa gra- 
dos para apuntar de nuevo al borde su- 
perior de la pantalla). 



Sin lugar a dudas, el método es muy 
simple. La figura adjunta muestra la se- 
rie de órdenes que educarán a la tortu- 
ga para que dibuje un aspa; un ejemplo 
que resume el empleo de los cuatro co- 
mandos presentados. 

Retorno al origen 

Para devolver a la tortuga a Ea posi- 
ción inicial, se han utilizado hasta aho- 



Instruyendo a la máquina 

: róe^dor es una herramienta capaz de demostrar su 
-2 Ge*: * eficacia en múl tipies actividades. Para que su 




capacidad se vuelque en ia práctica, es precise 
«instruirlo», comunicarle, con toda suerte de detalles, 
qué debe hacer y cómo debe hacerlo. 

Educar a la máquina, programarla, supone redactar una 




completa «receta» de instrucciones; o lo que es lo 
mismo, confeccionar un programa utilizando el lenguaje 
propio del ordenador. 

Si queremos que un cocinero nos prepare un plato que 
desconoce, es preciso darle la receta: una serie de 
instrucciones detalladas que, ejecutadas en su estricto 
orden, permitirán cocinar el plato. Hay ciertas 
instrucciones que deben ser especialmente detalladas; 
por el contrario, otras como 4reir» o «pelar», son de 
sobra conocidas por el cocinero y no exigen mayores 
precisiones. Hay que tener cuidado para no cometer 
errores al escribir la receta, puesto que no es lo mismo 
«pollo frío» que «pollo frito». 

Nuestro cocinero es el ordenador, alguien capaz de 
preparar cualquier plato que se nos antoje, por 
supuesto, siempre y cuando se le entregue la receta (el 
programa) adecuado. 

Una vez que se conozca con detalle el lenguaje del 
ordenador, su aplicación a cualquier actividad práctica 
llegará a constituir una tarea tan cómoda y habitual 
como realizar la colada. Sabemos cómo aportarle los 
datos. El se ocupará de procesar los datos de acuerdo a 
las instrucciones del programa, y entregará el resultado 
con prontitud y precisión. 



ra los comandos de movimiento y giro. 
Este es un método algo engorroso, 
puesto que las trayectorias de retorno 
dependen de !a posición que ocupe la 
tortuga, distinta en cada caso. Un méto- 
do bastante más cómodo para devolver 
al simpático quelonio a la posición de 
origen es la que brinda el comando 
HOME. Su ejecución obliga a la tortuga 
a regresar al origen, volviendo a la 
orientación de partida. Por supuesto, la 
línea que corresponde a la trayectoria 
de retorno quedará impresa en la pan- 
talla. 

Si lo que se desea es volver al princi- 
pio borrando lo dibujado, hay que optar 
por otro comando CS fClear Screen). 
Este elimina los rastros dejados por ja 
tortuga y la coloca en su posición ini- 
cial, Uno de los gráficos adjuntos ilus- 
tra el funcionamiento de [os nuevos co- 
mandos, en esta ocasión dibujando un 
asterisco. 



Pintando con la tortuga 



Hasta ahora se han presentado algu- 
nos comandos que instruyen a ia tortu- 
ga para que realice dibujos conexos; o 
lo que es lo mismo, dibujos continuos 
en los que todos los trazos están unidos 
entre sí. Sin embargo, también es posi- 
ble mover a la tortuga sin dibujar. Para 
lograrlo, existen algunos comandos que 
permiten controlar la «tiza» con !a que 
la tortuga pinta sobre la pantalla. 

Para desplazar a la tortuga sin que 
ésta deje el rastro de su trayectoria, es 
necesario «levantar» la tiza. El comando 
PENUP es el que ordena tal acción. Una 
vez ejecutado, los siguientes movimien- 
tos de la tortuga no imprimirán trazo al- 
guno en la pantalla. 

Cuando haya que pintar de nuevo, ha- 
brá que ordenar a la tortuga que «baje 
¡a tiza». De ello se ocupa ei comando 
^ENDOWfM. Este devuelve la tiza a su 
posición original, dispuesta para trazar 
'a huella del desplazamiento sobre la 
pantalla. El siguiente ejemplo muestra 
el empleo de ambos comandos: 



CS 

-ENUP 

-3RWARD 50 
-GHT9Ü 




I Las órdenes HOME y CS devuelven a la tortuga al origen de partida. La diferencia 
entre ambas radica en que CS borra la pantalla por completo, mientras que HOME 
no altera los dibujos que pudieran existir en la misma. 



PENDÜWN 
F0RWARD 50 
PENUP 
HOME 

El programa ejemplo dibuja una línea 
en la zona superior de la pantalla, de- 
volviendo a la tortuga a su posición ini- 
cial. Las sucesivas acciones de la tortu- 
ga al ejecutar el programa, empiezan 
tras borrar la pantalla (CS) y «levantar» 



Glosario 

INTELIGENCIA ARTIFICIAL: rama de la ciencia que 
investiga la simulación de una auténtica inteligencia en 
un ordenador. 

DEPURACION: fase del desarrollo de un programa 
consistente en la búsqueda de los fallos cometidos al 
codificarlo o escribirlo, 

PROCEDIMIENTOS: subprogramas que forman parte de 
un programa mayor o «principal», 

MEMORIA CENTRAL: zona para el almacenamiento de 
información residente en el interior del ordenador y a 
disposición directa de la unidad central de proceso. En 
ella se almacenan datos, variables y el programa o 
programas en curso. 



la tiza (PENUP). Acto seguido (FOR- 
WARD 50), la tortuga avanzará 50 posi- 
ciones en sentido vertical sin imprimir 
huella. A continuación, girará 90° a la 
derecha (RIGHT 90) para, de inmediato, 
«bajar» la tiza (PENDOWN) y dibujar una 
línea horizontal de 50 posiciones al eje- 
cutar la orden FORWARD 50. Para con- 
cluir su actividad, levantará de nuevo la 
tiza (PENUP) y regresará al original 
(HOME). 

Pero existen aún más posibilidades. El 
comando PE (Pen Erase) activa el borra- 
dor que ta tortuga lleva consigo. Por 
donde pase, después de ejecutar la or- 
den PE, irá borrando lo dibujado. 

El último de los comandos de esta ca- 
tegoría es PX. Con este comando la tor- 
tuga borrará lo que encuentre pintado y 
pintará allí donde no encuentre trazos. 
Hay que tener en cuenta que el efecto 
de PX es el de alterar el color de tiza, 
de tal forma que siempre sea el opues- 
to al color de la zona sobre la que se 
desliza. En consecuencia, pintará trazos 
en «negativo», que al superponerse so- 
bre las líneas dibujadas con la tiza en 
su color normal, las borrarán. 

He aquí un nuevo ejemplo: 
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PX 

FORWARD 50 
RIGHT 90 
FORWARD 50 
HOME 

AJ ejecutarlo, la tortuga recorrerá el 
mismo camino que en el ejemplo ante- 



rior; si bien, al estar activada ahora la 
función PX, trazará ef «negativo» del di- 
bujo previo y, en consecuencia, borrará 
la línea horizontal dibujada en el caso 
anterior. 

El siguiente ejemplo recurre a PE para 
borrar parte del dibujo creado en el 
ejemplo ilustrativo de PX: 



TABLA DE ORDENES-LOGO 


Instrucción 


Cometido 


Operador/Comando. 


FS 


Selección de pantalla gráfica 


Comando 


TS 


Selección de pantalla de texto 


Comando 


SS 


Selección de pantalla partida 


Comando 


MAKE r, <pa!abra> <dato> 


Definición de variable 


Comando 


PRINT <objeto> # 


Muestra el <objeto> por pantalla 


Comando 


* <objeto>: puede ser una palabra, una lista, un número o una variable. 



TABLA DE ORDENES DEL «TURTLE GRAPHICS» 


Instrucción 


Cometido 


Operador/Comando 


FORWARD <número> 


Avance de la tortuga 


Comando 


BACK <número> 


Movimiento hacia atrás 


Comando 


RIGHT <grados> 


Giro a la derecha 


Comando 


LEFT <grados> 


Giro a la izquierda 


Comando 


HOME 


Regreso al centro de pantalla 


Comando 


CS 


Borrado de pantalla y retorno al origen 


1 Comando 


PENUP 


«Levanta» la tiza 


Comando 


PENDOWN 


«Baja» la tiza 


Comando 


PE 


Activación del borrador 


Comando 


PX 


Activación de tiza de color inverso (negativo) 


Comando 


PEN 


indica el estado de la tiza o modo de dibujo 


Operador 


CLEAN 


Borra la pantalla dejando a ia tortuga en la 
posición que ocupa 


Comando 



Combinado 
adecuadamente los 
comandos para el control 
de la «tiza», es posible crear 
dibujos discontinuos sobre 
la pantalla y sacar un 
mayor partido a las 
posibilidades de la tortuga. 



PE 

FORWARD 25 
RIGHT 90 
FORWARD 25 
HOME 

Concretamente, la zona borrada coin- 
cidirá con la primera mitad de la línea 
vertical dibujada en el ejemplo anterior. 



¿Cuál es el estado de la tiza? 

En cualquier momento, el programa- 
dor puede perder la pista y no saber en 
qué modalidad está utilizando la tiza. 
Para solventar esta duda, se dispone de 
la función PEN. 

PEJM es un operador cuya respuesta 
señala el modo en el que está seleccio- 
nada la tiza. Los identificadores con los 
que responde tal operador constan de 
dos letras cuyo significado es: 

PD: Modo PENDOWN 

PU: Modo PEIMUP 

PE: Modo Borrador 

PX: Modo Inverso o «negativo». 

Como quiera que PEN es un operador, 
habrá q ue útil izarlo precedido por un co- 
mando; por ejemplo: PRINT PEN, que es- 
cribirá en pantalla el identíficador del 
modo en curso. 

Por último cabe mencionar la existen- 
cia del comando CLEAN. Su función es 
limpiar Ja pantalla. Al igual que CS, bo- 
rra todos los trazos anteriores. Pero a di- 
ferencia con aquél, no devuelve *la tor- 
tuga a la posición de origen. En defini- 
tiva, CS equivale a Ja asociación de los 
comandos CLEAN y HOME. 
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LOGO (2) 



Los procedimientos 



na de las facetas 
más importantes 
de] LOGO es el 
tratamiento de pa- 
labras y listas. En 
la terminología de este lenguaje, una 
palabra es un conjunto de letras, núme- 
ros y/ o signos especiales. Dada esta de- 
finición, es obvio que cualquier palabra 
en castellano (o en otro idioma) coinci- 
dirá con una palabra LOGO. Cabe recor- 
dar que ya en capítulos precedentes e 
han utilizado palabras para dar nombre 
a las variables. A su vez, una lista no es 
más que un conjunto de palabras. Una 
frase, un párrafo, o incluso un texto, son 
ejemplos de listas. El lenguaje LOGO 
permite manipular con notable soltura 
ambos tipos de elementos. En el trata- 
miento intervienen ciertos símbolos se- 
paradores que tienen asignada una es- 
pecífica función. 



r 



V <4 m c 
p h t n o y 

r s i ’ 
a 1 S 



vv i< 
V 5 K 



CARACTERES 



" AMARILLO 






PALABRAS 



¥ 



BLANCO 




AZUL 




VERDE 



PALABRAS 







LISTAS 






Separadores 



Una de fas aptitudes más relevantes del LOGO es el tratamiento de palabras y listas. 
Las palabras son agrupaciones de caracteres ( letras , números y/o símbolos 
especiales autorizados l mientras que las listas están constituidas por conjuntos de 
palabras o de otras listas más elementales {sablistas). 



El separador es un símbolo especial 
cuya misión es delimitar las distintas 
partes de una «frase». El principal sepa- 
rador en LOGO es el espacio en blanco. 
Su presencia revela el fin de una pala- 
bra. 

Si dos palabras se escriben una tras 
otra, sin interponer un espacio blanco 
entre ambas, el intérprete LOGO enten- 



derá que se trata de una sola palabra. 
Así pues, UNOYDOS es una palabra úni- 
ca, UNO YDOS será interpretado como 
dos palabras, y UNO Y DOS como tres 
palabras independientes. 

Un ordenador preparado para dialogar 
en LOGO no será capaz de asimilar, por 
ejemplo, la orden SUM32. Si en su lu- 



gar, se introduce la orden SUM 32, la 
máquina tomará como primera entrada 
32 y será incapaz de encontrar el segun- 
do dato de entrada. La instrucción co- 
rrecta será, en definitiva, SUM 3 2, Este 
es un ejemplo que i Tustra la importan- 
cia que tiene la correcta separación de 
las distintas zonas que intervienen en 
una instrucción. 



Comillas y corchetes 

Una palabra puede ser un dato de en- 
trada para una instrucción LOGO. En tal 
caso, la palabra ha de ir precedida por 
comillas. Para que el LOGO entienda 
que UNOYDOS es un dato de entrada, 
esta palabra debe aparecer como: 
"UNOYDOS. Por ejemplo, para escribir 
en la pantalla HOLA, la instrucción ade- 
cuada es: 

PRINT "HOLA. 

Cuando hay que tratar dos o más pa- 
labras juntas, éstas deben agruparse en 
la forma adecuada, formando una lista: 
conjunto de palabras encerradas entre 
corchetes, [BUENOS DIAS] es una lista 



FPUT y LPUT son operadores cuya especialidad es añadir palabras 
o sablistas al principio o al final respectivamente, de la lista 
que figure como segundo dato de entrada. 
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I EI operador COUNT 
contabiliza ef número de 
elementos que integran el 
dato de entrada sometido 
a examen. Este puede ser 
una palabra o una lista . 

En el primer caso se 
contarán tos caracteres 
que conforman la palabra , 
mientras que en el 
segundo serán las 
palabras y sublistas los 
elementos contabilizados. 



y el ordenador la tratará como si se tra- 
tara de una unidad. En cambio, '"BUE- 
NOS '"DIAS son dos palabras indepen- 
dientes: no constituyen una lista y, en 
consecuencia, ef ordenador las procesa- 
rá por separado por ejemplo: 

PRINT [BUENOS DIAS] 
escribirá en la pantalla ia lista completa. 



PRINT [BUENOS DIAS] (RT) 
BUENOS DIAS 



Una fista puede incluir, a su vez, otras 
listas de menor entidad o subastas. Por 
ejemplo: 

[HOLA [BUENOS DÍAS]] 

es una lista de dos elementos: una pa- 
labra y una sublista. La sublista en 
cuestión consta de dos elementos que 
en este caso coinciden con dos palabras, 
simples. El concepto de elemento que- 
da totalmente clarificado con el uso del 
operador COUNT (contar). 

COUNT admite como dato de entrada 
una palabra o una lista, y devuelve 
como dato de salida el número de ele- 
mentos que constituyen la entrada. 

Así por ejemplo: 

PRINT COUNT "HOLA (RT) 

4 

En efecto, el dato de salida o resulta- 
do es el número 4, puesto que son cua- 



MI NOMBRE ES HARDY 






FIRST es un operador LOGO que trunca su dato de entrada palabra o lista i 
tomando de éste su primer elemento. BUTFIRST realiza 
el mismo fraccionamiento , si bien entrega como salida todo los 
elementos del dato de entrada exceptuando el primero. 



tro los elementos (caracteres) de la pa- 
labra examinada. Si en lugar de aplicar 
el operador COUNT a una palabra lo ha- 
cemos sobre una lista, los elementos a 
contar no serán ya caracteres, sino pa- 
labras y sublistas: 

PRINT COUNT [BUENOS DIAS] (RT) 

2 

El resultado revela, en efecto, el nu- 
mero de palabras que intervienen en la 
lista señalada. 

Tanto para [ ] (lista vacía) como para 
" [palabra vacía) el resultado de COUNT 
es 0, 



Tratamiento de palabras y listas 

El LOGO posee un nutrido grupo de 
operadores especializados en el trata- 
miento de palabras y listas. En primer 
lugar cabe mencionar los cuatro si- 
guientes: FIRST, LAST, BUTFJRST y 
BUTLAST. Todos ellos son aplicables 
tanto a palabras como a listas, 

FIRST y LAST devuelven, respectiva- 
mente, el primer y el último elemento 
del dato de entrada, mientras que los 
otros dos operadores hacen exactamen- 
te lo contrario; esto es: BUTFIRST elimi- 
na el primer elemento y BUTLAST el úl- 
timo. Veamos el siguiente ejemplo: 



MAKE "LISTA1 [Mí NOMBRE ES) 
PRINT FIRST rLISTAT 
MI 

PRINT LASTiISTAI 
ES 



El programa empieza haciendo uso 
del comando MAKE para definir la LIS- 
TAI. Esta última palabra es el nombre 
que va a identificar a la variable, mien- 
tras que el dato a asignar (la lista de pa- 
labras) coincide con M! NOMBRE ES. 
Acto seguido aparece la instrucción 
PRINT FIRST :LISTA1, cuya finalidad es 
mostrar en la pantalla el resultado de 
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■ La diferencia entre SE y LIST radica en que LIST asocia sablistas, mientras que SE 
construye listas finales agrupando las palabras de ios datos de entrada. 



aplicar el operador FIRST al contenido 
de la variable LJSTA1 (cabe recordar la 
importancia de los dos puntos como in- 
dicador de variable). Por supuesto, el 
dato de salida es MI: la primera palabra 
o elemento de la lista. 

La siguiente instrucción ordena la 
presentación en pantalla del último ele- 
mento de la referida lista, para lo cual 
se utiliza el operador LAST. 

Los otros dos operadores presentados 
aplicados a la misma lista definida, da- 
rán como resultado el que muestra la si- 
guiente pantalla: 

W BUTFIRST :L!STA1 
SOMBRE ES 

PRINT BUTLAST : LISTA 1 
VI NOMBRE 

BUTFIRST presenta el contenido de la 
lista especificada, una vez suprimido el 
primer elemento, mientras que BUT- 
Í-AST muestra la lista en cuestión ex- 
ceptuando el último de sus elementos 

Las posibilidades de los cuatro opera- 
dores descritos no se reducen a la sim- 
ple actuación independiente. Pueden 
asociarse para dar un tratamiento más 
complejo a los datos de entrada. 

PRINT FIRST FIRST BUTLAST ¡LISTA! 

M 

Este es un ejemplo algo más compli- 
cado que combina la presencia de dos 
operadores FIRST y uno de tipo BUT- 
-AST. Cabe recordar que su aplicación 
es extensiva a listas y a palabras, ac- 
tuando sobre los elementos correspon- 
dentes: palabras en eí caso de que se 
veten listas y caracteres en el caso de 
vetar palabras. 

La instrucción del ejemplo aplica el 
:oerador BUTLAST al dato de entrada 
constituido por la lista definida (MI 
NOMBRE ES}; el dato de salida será, en 
: onsecueneia, la lista MI NOMBRE. A su 
*ez, esta lista actúa como dato de entra- 
ra de un operador FIRST, con lo que eí 
“uevo dato de salida será la palabra MI. 
-or último, ésta constituye el dato de 
entrada del primer operador FIRST. Aho- 
r B, ya no es una lista el dato afectado 
_or FIRST sino una palabra, de ahí que 
v resultado coincida con el primer ele- 
-ento o carácter de la misma: M. 

Dos nuevos operadores LOGO desti- 



nados al tratamiento de listas (en esta 
ocasión no son adecuados para operar 
con paiabras), son FPUT y LPUT. Su co- 
metido, ilustrado por el siguiente ejem- 
plo, es añadir un elemento al principio 
o al final de la lista indicada. 

PRIMT PRUT "JUAN 11STA1 
JUAN MI NOMBRE ES 

PRINT LPUT [JUAN PEREZ] :LISTA1 
MI NOMBRE ES JUAN PEREZ 

En el primer caso se inserta la pala- 
bra JUAN delante de la L1STA1, por me- 
dio del operador FPUT. La segunda ins- 
trucción, que ilustra la actuación de 
LPUT, añade la lista JUAN PEREZ al fi- 
nal de la indicada por medio de la va- 
riable LIST1, 

Así como FPUT y LPUT sólo admiten 
listas como segunda entrada, el opera- 
dor WORD admite únicamente palabras. 
Su misión es transformar a un conjunto 
de palabras en una palabra única, Así, 
por ejemplo, la salida de WORD "POR 
"QUE es la palabra PORQUE. 



Si el número de entradas es superior 
a dos, es necesario encerrar entre pa- 
réntesis al operador WORD y a los da- 
tos de entrada que lo acompañan: 

(WORD TA "TE "TI 'TO "TU) 

Cuando el objetivo sea construir una 
lista, hay que optar por el empleo de 
LIST. Este operador construye una lista 
integrada por sus datos de entrada. 

Al contrarío de WORD, LIST sólo ad- 
mite dos entradas; éstas pueden ser tan- 
to palabras como listas. 

MAKE "YO [JUAN PEREZ] 

PRIMT WORD "JUAN "PEREZ 

JUAMPEREZ 

PRIMT LIST 1ISTA1 ;Y0 

[MI NOMBRE ES) [JUAM PEREZ] 
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La modularidad del lenguaje LOGO queda plasmada en los procedimientos. Estos 
son módulos que pueden integrarse sucesivamente en otros procedimientos, cada 
vez más complejos, hasta construir el programa , 



El ejemplo añade a la definición rea- 
lizada anteriormente (LISTA! ), la defini- 
ción de una nueva variable de tipo lista 
con la que operar (YO). La segunda ins- 
trucción PRIIMT incluye al operador LIST, 
cuyo efecto es construir una nueva lista 
a partir de las dos sublistas especifica- 
das como dato de entrada. 

Otro de los operadores de esta cate- 
goría es SE (SEntence). Admite cual- 
quier número de entradas, expresándo- 
las al igual que en el caso de WORD. 

SE sintetiza una lista resultante a par- 
tir de sus entradas si éstas son palabras, 
o a partir de los elementos de los datos 
de entrada si éstos son listas. En defi- 
nitiva, la lista de salida de SE constará 
de palabras y nunca de sublistas como 
era el caso de LIST 
Una prueba palpable de tal distinción 
entre SE y LIST la aporta la inclusión 
del operador COUNT en las dos úftimas 
instrucciones PRINT del siguiente ejem- 
plo: 



PRIIMT SE ;LISTA1 :Y0 
MI NOMBRE ES JUAN PEREZ 

PRINT COUNT LIST ¡LISTA! ;YQ 
2 

PRIIMT COUNT SE ¡LISTA! :YQ 
5 



El primer COUNT aplicado a LIST 
cuenta las sublistas (2), mientras que el 
segundo cuenta las palabras resultan- 
tes (5) 

Los párrafos precedentes resaltan la 
importancia que tiene distinguir perfec- 
tamente en las entradas y salidas cuán- 
do se trata de palabras y cuándo de lis- 
tas. 

Si un operador recibe una entrada de 
tipo erróneo, el ordenador mostrará en 



la pantalla un mensaje de error. Por 
ejemplo, después de teclear: FPUT 
"IN"CREIBLE. Aparecerá el mensaje: 
FPUT DOESN 'T LíKE "CREIBLE AS 1N- 
PUT (FPUT no admite "CREIBLE como 
entrada). Un ligero repaso al operador 
FPUT le hará reparar en que la segunda 
entrada no puede ser una palabra sino 
que debe ser una lista. 



El operador ASCII 

El ordenador almacena y trata la in- 
formación codificada a modo de pala- 
bras binarlas o grupos de ceros y unos. 
Tanto las instrucciones como los datos 
(numéricos o alfanuméricos) adoptan 
este aspecto para que puedan ser mani- 
pulados por la máquina. 

A la hora de proceder a la codifica- 
ción, el ordenador puede acogerse a uno 
de los muchos códigos alfanuméricos, 
estandarizados o no r capaces de ade- 
cuar la información para que sea mani- 
pulable por los circuitos electrónicos. 
Entre ellos, el más extendido es el có- 
digo ASCII {American Standard Code for 
Information Interchange). A pesar de su 
naturaleza de código estándar, existen 
distintas versiones del código ASCII, cu- 
yas diferencias radican en la inclusión 
de un mayor o menor número de carac- 
teres especiales; no obstante, las letras 
tienen siempre asignados los mismos 
códigos: del 65 (A) al 90 (Z). El LOGO 
dispone de operadores que permiten la 
conversión de carácter a código y vice- 
versa. El primero de ellos, ASCII, de- 
vuelve el código def carácter que se es- 
pecifique como dato de entrada. 

La función opuesta corre a cargo del 
operador CHAR. Este transforma un nú- 
mero de entrada en el carácter ASCII co- 
rrespondiente. 



PRINT ASCII "A 
65 

PRINT CHAR 66 
B 

PRINT CHAR SUflfl 1 ASSC1I "B 
C 
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PROCEDIMIENTO 
TO NOMBRE 




ORDENES 



I 



tos programas LOGO son estructuras creadas a partir de fa asociación de 
procedimientos o módufos elementales. Un procedimiento es un conjunto de 
órdenes destinadas a programar una determinada acción 



Los ejemplos anteriores ilustran la 
actuación de ambos operadores. 



Creación de procedimientos 

A la hora de definir las características 
primordiales del LOGO, surge de inme- 
diato el calificativo de modular. En efec- 
to, los programas en LOGO están cons- 
truidos a base de módulos cuya conjun- 
ción da Jugar a estructuras más comple- 
jas. Estos módulos son los denominados 
procedimientos. 

Un procedimiento no es más que una 
sucesión de órdenes encaminadas a 
realizar una acción más compleja. Re- 
quisito básico es que el conjunto de or- 
cen es que constituyen el procedimiento 
aparezcan ordenadas en una secuencia 
apropiada; hay que tener en cuenta que 
no es fo mismo sumar dos cantidades y 
elevar el resultado al cubo, que elevar 
al cubo las cantidades y luego sumar los 
resultados. Las órdenes de un procedi- 
miento, una vez ejecutadas, darán lugar 
= un resultado; éste coincidirá con Ja ac- 
: ón encomendada al procedimiento. Tal 
=cción puede ser, sencillamente, una 
:arte de un cálculo más complejo. Por 



ejemplo, un procedimiento que resuel- 
va ecuaciones de segundo grado resul- 
tará de gran utilidad a la hora de hallar 
solución a múltiples problemas mate- 
máticos. 



Todo procedimiento LOGO comienza 
con la palabra TO y finaliza con END. La 
primera línea debe contener, tras la pa- 
labra clave TO, el nombre con el que se 
va a identificar al procedimiento. Ello in- 
dica al LOGO que a partir de ese punto 
empieza el procedimiento especificado. 

Las restantes líneas estarán ocupadas 
por las sucesivas órdenes, con una con- 
dición importante: la primera orden de 
cada línea debe ser un comando. En la 
última línea se colocará la palabra cla- 
ve END, para que eí LOGO entienda que 
ha concluido la definición del procedi- 
miento. 



TOMOLA 
PRIIMT "HOLA 

PRÍIMT [BIENVENIDO AL LOGO] 
END 

HOLA DEFIftED 



El programa corresponde a la crea- 
ción de un procedimiento. En efecto, 
cabe observar que se han respetado las 
condiciones impuestas para la defini- 




ios procedimientos pueden asociarse para dar cuerpo a «superprocedimien tos» o 
procedimientos LOGO más complejos , 
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ción. La primera línea empieza con la 
palabra TO, seguida por el nombre pro- 
cedimiento — HOLA, en nuestro caso — , 
y Ja última línea incluye la orden END; 
esta última comunica al ordenador que 
ha terminado la definición. 

La respuesta de la máquina no se 
hace esperar: muestra en la pantalla el 
mensaje "HOLA DEFINED" (HOLA defi- 
nido). 

A partir de este preciso instante, para 
hacer uso del procedimiento HOI_A r bas- 
tará con teclear su nombre. 

Realmente, la creación de un proce- 
dimiento equivale a definir una nueva 
orden que funcionará exactamente igual 
que las incluidas en el repertorio origi- 
nal del LOGO. De hecho, un procedi- 
miento puede incluso formar parte de 
otro procedimiento más complejo (su- 
perprocedimiento}, Veamos un nuevo 
ejemplo: 



TO SALUDO 
HOLA 

PRINT [COMO TE LLAMAS?] 

PRINT LPUT FIRST RL [BUENOS DIAS] 
END 



I Lo$ procedimientos pueden exigir la presencia de parámetros de entrada que SALUDO DEFINED 

precisen su actuación al ejecutarlos . Asimismo , los procedimientos 
pueden emitir datos o parámetros de salida. 




En esta ocasión se ha definido un 
nuevo procedimiento, denominado SA- 
LUDO. Un dato significativo es que se 
ha utilizado el procedimiento anterior, 
HOLA, como si se tratara de un coman- 
do propio del LOGO. Esta filosofía per- 
mite la subdivisión de problemas com- 
plicados en pequeños fragmentos ele- 
mentales. 

Por ejemplo, para calcular los gastos 
domésticos cabe seguir los siguientes 
pasos: 



END 



I A i a hora de modificar un procedimiento , no es preciso reescribirlo de nuevo en su 
totalidad. El lenguaje LOGO dispone de un comando de edición ( EDIJ } que visualiza 
el contenido del procedimiento elegido y permite su modificación . 



— Apuntar gastos de alimentación. 

— Sumarlos y apuntar el resultado. 
Apuntar gastos de servicios contra- 
tados para la casa (luz, agua...). 

— Sumar y escribir resultado. 

— Apuntar gastos de otras compras. 

— Sumar y apuntar resultado. 

— Sumar los totales y escribir el resul- 
tado. 
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La orden EDIT vuelca el procedimiento en la pantalla y brinda al usuario la 
posibilidad de corregir y alterar su contenido, La edición se reduce a desplazar el 
cursor al punto adecuado y utilizar tas teclas alfabéticas y numéricas 
para realizar los cambios oportunos. 



La tarea aparece fraccionada en un 
conjunto de acciones elementales que H 
sin lugar a dudas, facilitan ta compren- 
sión y el cálculo. Esta misma filosofía 
de descomponer un trabajo en acciones 
parciales es compartida por la progra- 
mación en LOGO. El caso propuesto 
puede adoptar la forma de procedimien- 
to LOGO: 

T GASTOS 
EXTRA.AUMEN 
SJMA.AL1MEN 
EXTRA. CASA 
SUMA.CASA 
EXTRA OTROS 
SJMAÜTRQS 
SUMA TOTAL 
EXD 

El procedimiento global GASTOS in- 
:!uye las sucesivas acciones a realizar 
:ara evaluar el gasto doméstico total; 
:esde Juego, hace uso de otros procedí - 
- entos mas elementales que será pre- 
; so definir por separado. En el ejemplo, 
ss observa que todas las órdenes de 
BASTOS son procedimientos. Todas 
s as deben ser creadas antes de utili- 
zar el procedimiento GASTOS. 

La definición del último de ellos, SU- 
VA .TOTAL, puede adoptar la siguiente 
Lrma: 



TO SUMA. TOTAL 

MAKE "TOTAL SU M;QTRGS :CASA 

¡ALIMENTOS 

PRINT [TOTAL GASTOS] 

PRINT LIST TOTAL "PTS 
END 

SUMAJOTAL DEFINED 



Las variables OTROS, CASA y ALI- 
MENTOS, utilizadas para calcular la 
suma total, contienen las sumas parcia- 
les de los respectivos conceptos. Por 
ejemplo, la variable :CASAque almace- 
na el gasto total de los servicios domés- 
ticos contratados se calculará dentro del 
procedimiento SUMA.CASA: 

TO SUMA.CASA 

MAKE TASA SUMLIST ÍISTA.CASA 
PRINT [TOTAL GASTOS DE CASA] 

PRINT LIST TASA "PTS 
END 

El procedimiento SUMA.CASA hace 
uso del subprocedimiento SUMLIST a 
modo de operador SUMLIST admite una 
entrada y proporciona una salida; este 
tipo de procedimientos, que pueden ac- 



tuar indistintamente como comandos u 
operadores, reciben el nombre de pro- 
cedimientos con parámetros , 



Procedimientos con parámetros 

Al igual que ocurre, en el caso gene- 
ral, con los datos del LOGO cabe distin- 
guir dos tipos de parámetros: de entra- 
da y de salida. Los primeros constituyen 
datos de entrada ai procedimiento y de- 
ben especificarse detrás del propio nom- 
bre del procedimiento. Por ejemplo: 

TO SUMLIST :L 

indica que el procedimiento SUMLIST 
precisa de un dato de entrada represen- 
tado por la variable :L. En el mismo 
caso, el dato en cuestión será identifi- 
cado, dentro del procedimiento, por :L. 

El procedimiento SUMLIST podría de- 
finirse de la siguiente forma: 

10 SUMLIST i 

IF EMPTYP ± [OUTPUT 0 STOP] 

OUIPUT SUM [FIRST :L) (SUMLIST 
(BUTFffiST !]) 

END 

Este procedimiento es algo más com- 
plicado; si bien, por el momento sólo se 
prestará atención a los parámetros de 
entrada y salida. 

El parámetro de entrada se ha utiliza- 
do como dato en los cálculos. Su em- 
pleo es idéntico al de las variables; ello 
permite que el procedimiento admita 
distintos datos como entrada. 

Respecto a la salida, hay que mencio- 
nar ai operador OUTPUT (salida). OUT- 
PUT coloca su dato de entrada como 
dato de salida del procedimiento en el 
que se encuentra. En el ejemplo pro- 
puesto, el mencionado operador se uti- 
liza para «extraer» el valor de la suma. 
Por supuesto, un determinado procedi- 
miento puede carecer de uno o de am- 
bos tipos de parámetros. 

A continuación aparecen dos ejem- 
plos prácticos que ilustran la actuación 
del operador OUTPUT y resumen el 
comportamiento de un procedimiento 
con parámetros. 

El primero de ellos adjudica el dato 
numérico 3 al procedimiento TRES; una 
operación análoga a las asignaciones de 
variables, tal como se observa al orde- 
nar la impresión de TRES: 
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TO TRES 
OUTRUT 3 
END 

TRESDEFINED 

PRIIMT TRES 
3 



El segundo ejemplo, algo más evolu- 
cionado, ilustra la actuación de un pro- 
cedimiento con parámetros. En primer 
fugar, se procede a la definición del pro- 
cedimiento INICIAL, asociándole un pa- 
rámetro ; PALABRA y se define la fun- 
ción de imprimir el primer elemento del 
citado parámetro. 



TO INICIAL : PALABRA 
PRINT FIRST :PALABRA 
END 

INICIAL DEFINED 



Una vez definido el procedimiento po- 
demos ya utilizarlo en. la práctica, sin 
más que recurrir a su nombre como sí 
se tratara de una orden LOGO. 



INICIAL "DAVID 
0 

MAKE "JEFE "PACO 
INICIAL JEFE 
P 



En el primer caso, se le otorga como 
dato de entrada la palabra DAVID. Su 
ejecución mostrará en pantalla el pri- 
mer elemento (letra D) del dato entre- 
gado como parámetro. 



NOMBRE 












PROCEDIMIENTO 

TELEFONO 



TO TELEFONO: NOMBRE 
PRINT THING " NOMBRE 
PRINT THING : NOMBRE 
END 



[ 
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feccion ar una lista con ¡os nombres de 
los procedimientos y situarla como dato 
de entrada al comando EDIT. Por ejem- 
plo: 

EDIT 'TRES 

EDIT [GASTOS SUMA.TQTAL SUMA.CASA SUMUST] 

son formulaciones correctas del men- 
cionado comando. En el primer caso fa- 
cilitará la modificación del procedimien- 
to cuyo nombre es TRES, mientras que 
en el segundo permitirá la edición de los 
cuatro procedimientos cuyos nombres 
figuran en la lista. 



ta función del operador THING es. &n 
genera l devolver el contenido . El 

SS£Í£ Z!%£lu¡! Xco Verdad y falsedad en LOGO 

—cuyos contenidos son ios 
respectivos números de teléfono — , 

„ ilustra su doble funcionalidad. Además de las posibilidades de mani- 

pular palabras y listas, e¡ lenguaje 



La entrada asociada a! procedimiento 
con parámetro INICIAL puede ser tam- 
bién una variable. La asignación MAKE, 
otorga Ja palabra PACO a la variable 
JEFE. Ahora, al ejecutar el procedimien- 
to INiCIAL sobre el parámetro JEFE, la 
pantalla mostrará la primera letra del 
nombre PACO conténido en la variable 
JEFE. 



Edición de procedimientos 

Si se desea modificar un procedimien- 
to no hace falta escribirlo de nuevo. El 
comando EDIT facilita esta tarea, visua- 
lizando y permitiendo la modificación de 
procedimientos. EDIT admite un dato de 
entrada que puede coincidir con un 
nombre de procedimiento (palabra) o 
con varios nombres (lista). 

Realmente, EDIT abre el acceso al 
editor de procedimientos. Una vez en el 
editor, se visualiza el procedimiento o 
procedimientos especificados y el cur- 
sor, Este último puede posicionarse allí 
donde el usuario desee realizar el cam- 
bio. 

Es posible editar más de un procedi- 
miento a la vez. Para ello es preciso con- 




Al ejecutarse el procedimiento 
1 teléfono " cuyo parámetro de 
entrada es " nombre ", se observa que 
el operador THING puede devolver 
tanto ei nombre de la variable 
introducida como parámetro (THING 
“NOMBRE), como el contenido de la 
misma (THING .NOMBRE). 



LOGO permite realizar comparaciones e 
identificaciones de tipo. Los operadores 
integrados en este grupo, responden 
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con TRÜE (cierto) o FALSE (falso) como 
datos de salida. 

Un primer operador al respecto es 
WORDP. Este responderá TRUE en ef 
caso de recibir como entrada una pala- 
bra y FALSE en caso contrario. 

De forma análoga actúan LISTP y 
NUMBERP con listas y números, respec- 
tivamente. 

Un buen ejercicio es combinar estos 
dos operadores con los estudiados en 
anteriores capítulos, para identificar el 
tipo de las salidas que entregan en cada 
situación. Por ejemplo: 

3 R1NT WORDP [CURSO DE BASIC] 

FALSE 

-mi WORDP FIRST (CURSO DE BASIC] 

MJE 




Para evaluar ei tipo de dato 
manipulado , el LOGO cuenta con tres 
operadores adecuados para detectar 
palabras , listas y números. Estos son 
respectivamente, WORDP, LISTP y 
NUMBERP 



PRINT MEMBERP [EL] 1ISTA3 
FALSE 

PRINT MEMBERP 7[1[3]5 [7]9] 
FALSE 



Algo más sobre variables 

Por el momento, el trabajo con varia- 
bles se ha centrado casi por completo 
en el uso del comando MAKE, adecua- 
do para asignar un dato a la variable es- 
pecificada. Las posibilidades de MAKE 
no terminan ahí. Cada vez que se ejecu- 
ta el comando MAKE acompañado de un 
nuevo nombre de variable, éste reserva 
espacio para esa variable. 




-mi LISTP BUTLAST LIST "DON :YÜ 
"RUE 



Tanto en el ámbito de las palabras 
como de las listas, cabe la nulidad; esto 
es: la palabra vacía (") o la lista vacía 
Q) en las que no interviene ningún ele- 
mento. El operador EMPTYP evalúa tal 
situación, y responde con TRUE sí su 
dato de entrada coincide con una pala- 
ora o una lista vacía. Hay que tener en 
:uenta que para el LOGO una palabra 
-acía y una lista vacía no son la misma 
cosa. Ello puede comprobarse utilizan- 
do el operador EGUALP. 

EQUALP compara dos entradas y co- 
munica si son o no iguales. 

=r;nt EIWIPTY Q 
THUE 

-NT EGUALP" [] 
r L_SE 

mm EQUALP "CASA [CASA] 

: AdSE 



-N 



TRUE 



NAMEP " VIDEO 



O 



I FALSE | 




DOS 



HOLA 






BLANCO 



COSA 



MESA 

mu 



VIDEO 
I I 



AYER 



JUAN 




■ La función del operador NAMEP es averiguar si una palabra coincide 
con el nombre de una variable previamente definida. 



Un último operador de esta categoría 
fs MEMBERP. Necesita dos datos de en- 
cada: el primero puede ser una palabra, 
-i número o una lista, mientras que el 
segundo debe ser obligatoriamente una 
tsta. 

La respuesta seré TRUE si la primera 
entrada es un elemento que forma par- 
-f de lista indicada. Es evidente que su 
_:ilidad se manifiesta a la hora de eva- 



luar la presencia de una palabra o de 
una sublista dentro de una lista más 
compleja. Los siguientes ejemplos, ba- 
sados en la LISTA3 definida, revelan su 
actuación. 

PRINT MEMBERP "EL : LISTAS 
MAKE "LISTAS [EL LENGUAJE LOGO] 

TRUE 



Al respecto, cabe recordar que no es 
posible utilizar una variable sin antes 
definirla previamente por medio de 
MAKE. 

El LOGO lleva buena cuenta de las 
variables definidas. 

Un método para averiguar si una pa- 
labra coincide con el nombre de una va- 
riable lo aporta el operador NAMEP, 
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Este admite un dato de entrada y res- 
ponde con TRUE si ei mencionado dato 
es el nombre de una variable previa- 
mente definida. Al igual que otros ope- 
radores similares, descritos anterior- 
mente, su verdadera utilidad práctica 
saltará a la luz al abordar el estudio de 
los bucles. 



El operador THING 

En algunos casos, es conveniente que 
el contenido de una variable coincida 
con el nombre de otra. Esta es una si- 
tuación que queda ilustrada por el si- 
guiente ejemplo. 



Una vez introducidas las dos instruc- 
ciones que siguen: 

MAKE "NUMERO "DIEZ 
MAKE "DIEZ 10 

para acceder al número 10 es preciso 
recurrir al nombre de variable :DIEZ. 
Esta es una función realizable por me- 
dio de un nuevo operador: THING. 

THING “DIEZ actúa exactamente igual 
que :DIEZ, accediendo al número 10: 
THING admite como entrada la palabra 
que constituye el nombre de una varia- 
ble y devuelve su contenido. No obstan- 
te, THING permite algo más. 

En el mismo ejemplo, la salida de 
THING “NUMERO será “DIEZ; sin em- 
bargo, la salida de THING :NUMERO r 
coincidirá con 10. En definitiva, con 
THING es posible acceder al «contenido 
del contenido» de una variable. 

Un ejemplo esclarecedor lo aporta el 
siguiente programa. Empieza con la 
asignación de dos variables (dos nom- 
bres a los que se asigna su correspon- 
diente número de teléfono). A continua- 
ción, se define un procedimiento al que 
se asocia el parámetro :NOMBRE; un 
procedimiento que incluye la doble po- 
sibilidad de uso del operador THING: 
acompañado por un nombre de variable 
expresado como palabra (“NOMBRE) o 
como variable (:NOMBRE). 



MAKE "LUIS 123 23 30 
MAKE "PACO 430 26 26 
T0 TELEFONO :NQMBRE 
PRINT THING "NOMBRE 
PRINT THING :N0MBRE 
END 

IELEFQN0 DEFINE D 



La ejecución evidencia las dos posi- 
bles actuaciones del operador THING. Al 
ejecutar el procedimiento TELEFONO, 
dando como parámetro un nombre de 
variable, el ordenador responderá pre- 
sentando el nombre en cuestión (PRINT 
THING “NOMBRE), seguido por, el nú- 
mero de teléfono o contenido de la men- 
cionada variable (PRINT THING HOM- 
BRE). 



TABLA DE ORDENES-LOGO (1) 


Instrucción 


Cometido 


Operador/Comando 


COUNT <objeto> 


Cuenta elementos 


' Operador 


FIRST <objeto> 


Da el primer elemento 


Operador 


LAST <objeto> 


Da eJ último elemento 


Operador 


BUTFIRST <objeto> 


Elimina primer elemento 


Operador 


BUTLAST <objeto> 


Elimina último elemento 


Operador 


LPUT 


Añade al final 


Operador 


FPUT 


Añade al principio 


Operador 


LIST 


Construye una lista 


Operador 


SE 


Construye una lista de palabras 


Operador 


WORD 


Construye palabras 


Operador 


ASCII <palabra> 


Da el código ASCII de la inicial 


Operador 


CHAR <número> 


Da el carácter ASCII correspondiente 


Operador 


<objeto>: puede ser una palabra, una lista, un número o una variable (ver tabla de entradas y salidas). 



NATURALEZA DE LOS DATOS DE ENTRADA Y SALIDA 


Operador 


Entrada 1 


Entrada 2 


Salida 


COUNT 


<pal/lis> 




<número> 


FIRST/LAST 


<palabra> 




Ccaráct er> 




<lísta> 




<p a i ab ra/su bl ista> 


BUTFIRST/ BUTLAST 


<palabra> 




<paiabra> 




<Üste> 




<lista> 


LPUT /FRUI 


<pal/!is> 


<lista> 


<lista> 


WORD 


<palabra> 


<palabra> 


<palabra> 


LIST 


<pal/lis> 


<pal/lís> 


<lista> 


SE 


<pal/lis> 


<pal/lis> 


<lista> 


ASCII 


<carácter> 




<número> 


CHAR 


<número> 




<carácter> 



TABLA DE ORDENES-LOGO (2) 


Instrucción 


Cometido 


Operador/Comando 


MAKE <palabra> <dato> 


Crea variable 


Comando 


TO <nombre> [<variables>] 


Crea procedimiento 


Comando 


END 


Determina el fin de un procedimiento 


Comando 


EDIT [<nombre>„.] 


Activa el editor de procedimientos 


Comando 


<nombre>: nombre cfel procedimiento (sin comillas). 

<variables>: posibles variables locales (precedidas por dos puntos). 
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TELEFONO "LUIS 
LUIS 

123 28 30 

TELEFONO "PACO 

PACO 

430 2626 



Obsérvese que THING "NOMBRE 
equivale a :NOMBRE y que THING 
NOMBRE equivale a THING THING 
"NOMBRE. 



Variables globales y locales 

Al hablar de procedimientos con pa- 
rámetros se indicó que los parámetros 
de entrada actúan como variables aso- 
ciadas a la ejecución del referido proce- 
dimiento. Estas variables son de un tipo 
especial y reciben el nombre de varia- 
bles locales. 

Las variables locales se diferencian 
de las restantes en varios aspectos. * 

— No es preciso definirlas por medio 
del operador MAKE. 

— Su nombre no es identificado por 
NAMEP 

— Sólo tienen validez dentro del proce- 
dimiento en el que se encuentran. 

Las variables globales pueden ser vi- 
sualizadas y modificadas por medio del 
editor de variables, al que se accede a 
-avés del comando EDNS (EDit NameS). 
El editor de variables funciona del mis- 
ólo modo que el de procedimientos, con 
a salvedad de que también permite se- 
ñalizar el valor de las variables globa- 
es. 

Espacio de trabajo 

El espacio de trabajo (Work Space) es 
el conjunto de procedimientos y varia- 
rles, definidos por el usuario, que se en- 
uentran en la memoria del ordenador. 

El lenguaje LOGO dispone de varios 
Amandos para el manejo del espacio de 
^abajo. 

En primer lugar están los comandos 
ue muestran el contenido actual del 



espacio de trabajo Todos ellos comien- 
zan por PO (Print Out): 

POTS (Print Out TitleS): muestra to- 
dos los nombres (títulos) de los procedi- 
mientos existentes en el espacio de tra- 
bajo, 

POPS (Print Out ProcedureS): visuali- 
za en la pantalla el contenido de todos 
Jos procedimientos. 

Si lo que se desea es visualizar exclu- 
sivamente el contenido de un determi- 
nado procedimiento, hay que utilizar el 
prefijo PO seguido por el nombre del 
procedimiento. Por ejemplo: 

PO 'INICIAL 



mostrará en la pantalla el procedimien- 
to INICIAL. 

En general, los referidos comandos 
permiten ver, pero no modificar los pro- 
cedimientos; para efectuar cualquier 
cambio es preciso recurrir al comando 
para la edición de procedimientos: EDIT. 

Un segundo grupo de comandos es- 
pecializados en el tratamiento del espa- 
cio de trabajo, está integrado por los 
destinados a visualizar las variables glo- 
bales definidas. 

PONS (Print Out NameS): muestra los 
nombres y contenidos de las variables; 
no obstante, al igual que PO y POPS, no 
permite su modificación. 



ORDENES DE CONTROL DEL ESPACIO DE TRABAJO 


Instrucciones 


Cometido 


Operador/Comando 


ERALL 


Borra el espacio de trabajo 


Comando 


ERASE <objeto> 


Borra procedimiento(s) 


Comando 


ERN <objeto> 


Borra variable(s) 


Comando 


ERNS 


Borra todas las variables 


Comando 


ERPS 


Borra todos los procedimientos 


Comando 


PO <objeto> 


Muestra procedimiento 


Comando 


POALL 


Muestra espacio de trabajo 


Comando 


PONS 


Muestra variables (globales) 


Comando 


POPS 


Muestra procedimientos (definiciones) 


Comando 


POTS 


Muestra procedimientos (títulos) 


Comando 


NODES 


Da el número de nodos libres 


Operador 


RECYCLE 


Reorganiza memoria 


Comando 


<objeto> puede ser una palabra o una lista 





TABLA DE ORDENES-LOGO (3) 


Instrucción 


Cometido 


Operador/Comando 


WORD <objeto> 


TRUE si <objeto> es palabra 


Operador 


LISTP <objeto> 


TRUE si <objeto> es una lista 


Operador 


NUMBERP <objeto> 


TRUE si <objeto> es un número 


Operador 


EMPTY <objeto> 


TRUE si <objeto> vacío 


Operador 


EQUALP <obj1> <obj2> 


TRUE si <obj1> y <obj2> son iguales 


Operador 


MEMBERP <obj> <lista> 


TRUE si <obj> es elemento de <li$ta> 


Operador 


NAMEP <palabra> 


TRUE si es nombre de variable 


Operador 


THING <objeto> 


Devuelve el contenido 


Operador 


EDNS 


Activa el editor de variables 


Comando 


<objeto> puede ser una palabra o una variable. <nombre> es el nombre del procedimiento (sin co- 
millas). <variables> son las posibles variables locales (con dos puntos). 
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MtMBtHH es otro de los operadores LOGO cuya respuesta es TRUE (cierto) o 
FALSE (falso). Se ejecución permite confirmar la presencia de una 
palabra o de una sublista dentro de la lista especificada. 



( ESPACIO PE TRABAJO 




( LOGO ) 




Ordenes LOGO para el control del «espacio de trabajo» o conjunto de 
procedimientos y variables, definidos por el usuario, que se 
encuentran en la memoria del ordenador. 



POALL {Print Qut ALL): este es otro 
comando afecto ai espacio de trabajo; su 
especialidad es presentar en la pantalla 
el contenido de todo el especio de tra- 
bajo. Existe también la posibilidad de 
borrar una parte o la totalidad del espa- 
cio de trabajo. Los comandos utilizables 
para tal fin comienzan por ER (ERase). 

ERASE; borra el procedimiento o pro- 
cedimientos cuyos nombres acompañan 
al comando. 

Por ejemplo: 

ERASE "CASA 

hace que desaparezca del espacio de 
trabajo el procedimiento CASA. 

Tal como se ha indicado, ERASE ad- 
mite también una lista de nombres de 
procedimientos; todos ellos serán borra- 
dos por efecto del mismo comando. 

ERPS (ERase ProcedureS): éste es un 
comando LOGO cuya especialidad es la 
de borrar, a la vez, todos los procedi- 
mientos que se encuentran en el espa- 
cio de trabajo. 

Por loque respecta a las variables, es 
posible borrar sólo algunas o todas a la 
vez. ERN borra la variable o lista de va- 
riables especificada, mientras que ERNS 
(ERase NameS) borra todas las variables 
de «un plumazo». Hay que señalar que 
ambos comandos eliminan tanto el con- 
tenido como el nombre de las variables, 
con lo cual, las variables borradas de- 
saparecen por completo del espacio de 
trabajo. Por último, cabe mencionar al 
comando ERALL (ERase Aíl), cuya eje- 
cución borra todo el espacio de trabajo. 

Cada vez que se crea un procedimien- 
to o variable queda ocupada una zona 
del espacio de trabajo. Para conocer 
cuánto espacio queda aún disponible se 
utiliza el operador NODES. Este respon- 
de con el número de «nodos» libres. 
Cada nodo equivale a cinco bytes de me- 
moria. 

A! eliminar procedimientos o varia- 
bles se producen «huecos» en eí espa- 
cio de trabajo ocupado. Para reordenar 
los procedimientos y variables hay que 
recurrir al comando RECYCLE. RECYCLE 
reúne los nodos libres reagrupando el 
espacio de trabajo utilizado. NODES pro- 
porciona el número real de nodos libres 
si se utiliza previamente RECYCLE. Un 
dato a señalar es que si no queda espa- 
cio suficiente a Ja hora de crear un pro- 
cedimiento, se ejecuta automáticamen- 
te el comando RECYCLE. 
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LOGO (3) 



TURTLE GRAPHICS: 
Los gráficos del 
LOGO 



n un capítulo an- 
terior ya se pre- 
sentaron los fun- 
damentos del tra- 
tamiento de gráfi- 
cos con el LOGO. Asimismo, en el ca- 
: lulo anterior se han detallado el con- 
zepto y uso de los procedimientos. Este 
capítulo va a combinar ambos temas, 
-asladando las posibilidades que ofre- 
:en los procedimientos al terreno de la 
:cnfeción de dibujos con la tortuga. Se 
idearán procedimientos capaces de tra- 
zar gráficos y se verán las enormes po- 
; cilrdades que éstos aportan a la con- 
moción de gráficos. 



-rocedimientos con la tortuga 



Uno de los ejemplos incluidos en la 
rzesentación del «Turtle graphics» fue la 
secuencia de órdenes adecuadas para 
.-azar una línea en la zona superior de 
= pantalla, devolviendo a la tortuga, a 
::^tinuación, a su posición original. El 
-eferido conjunto de órdenes puede in- 
e^arse dentro de un procedimiento, sin 
^ í s que apelar al método de definición 
a estudiado; por ejemplo: 

“.SEA 



“PY.ARD 50 

r E-~9G 

^VDOWN 

50 

-DA ÍE 
BC 



- integrar la secuencia de órdenes 
me~~ro de un procedimiento, se evita fa 
necesidad de teclear de nuevo Jas mis- 
es órdenes cada vez que desee real i- 
zs se la misma acción. 

“odas las posibilidades de la creación 
ae gráficos por medio de la tortuga pue- 
-3' ocluirse en procedimientos. A con- 
moción, se describen algunos proce- 
: - entos con la tortuga que pueden re- 
i_ :ar útiles a la hora de trazar dibujos 
—as complejos. 

El primero de ellos, cuyo nombre es 




La técnica de los procedimientos LOGO es íntegramente aplicable al método « Turtle 
, Graphics ». Las secuencias de órdenes de dibujo pueden adoptar la forma de 
procedimientos, con o sin parámetros. 



CUADRADO 1, es capaz de dibujar un 
cuadrado de 50 posiciones de lado. Tras 
confeccionar el dibujo, la tortuga queda 
emplazada en su posición de origen, tal 
como muestra la correspondiente pan- 
talla. 

T0 CUADRAD01 
FORWARD 50 
RIGHT 90 
FORWARD 50 



R1GHT 90 
FORWARD 50 
RIGHT 90 
FORWARD 50 
RIGHT 90 
END 

Un nuevo ejemplo lo aporta el proce- 
dimiento que sigue (TRIANGULO! ); su 
ejecución dibuja un triángulo cuyo lado 
es de 50 posiciones. 




CASA 

TQ CASA RIGHT 30 
CUADRADO! TRIANGULO! 
FORWARD 50 END 




ROMBO 

TO ROMBO PX 
RIGHT 30 TRIAN GUL01 
TRIANGUL01 PENDOWN 
RIGHT SO END 




MOLINO 




TD MOLINO 


TRIANGULO] 


TRIANGULO] 


LEFT 45 


LEFT 45 


TRIANGULO] 


TRIANGULO] 


LEFT 45 


LEFT 45 


TRIANGULO] 


TRIANGULO! 


LEFT 45 


LEFT 45 


TRIANGULO! 


TRIAMGULÜ1 


LEFT 45 


LEFT 45 


END 



La aphcacíón de la técnica de los procedimientos LOGO al dibujo con la tortuga i 
permite construir procedimientos gráficos, cada vez más complejos, al asociar 
varios procedimientos elementales . Las pantallas ilustran la ejecución de tres 
procedimientos en cuya definición intervienen otros más primitivos (CUADRADO 1 y 
TRIANGUL0 1) definidos con anterioridad. 
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TO TRIAN Gil L0 1 
FORWARD 50 
RIGHT 120 
FORWARD 50 
RIGHT 120 
FORWARD 50 
RIGHT 120 
END 

De nuevo, en este segundo ejemplo, 
una vez realizado el dibujo, la tortuga 
queda en la posición de partida. Cabe 
notar que la suma de los ángulos gira- 
dos es de 360 grados (una vuelta com- 
pleta), de ahí que el retorno de la tortu- 
ga a la posición de origen, y con la orien- 
tación adecuada, sea directo. 

Ahora, es posible utilizar los dos pro- 
cedimientos elementales definidos para 
crear figuras más complicadas. Un 
ejemplo lo constituye el procedimiento 
BANDERIN1 que hace uso de TR1ANGU- 
LOI para dibujar un banderín con más- 
til. 



T0 BAMDER INI 
FORWARD 30 
TRIANGUL01 
END 



El cuadro adjunto contiene tres nue- 
vos ejemplos de procedimientos de di- 
bujo más evolucionados (CASA, ROM- 
BO y MOLINO), que hacen uso de los ya 
definidos: CUADRAD0 1 y TRIANGU- 
L0 1 . 

Estas son algunas posibilidades que 
brinda la aplicación de los procedimien- 
tos LOGO al método «Turtle graphics». 
Por supuesto, la versatilidad de los pro- 
cedimientos con parámetros también es 
trasladable al caso de la tortuga. Mues- 
tra de ello van a constituirla los ejem- 
plos de los próximos apartados. 



Procedimientos a medida 

Una vez creados los procedimientos 
CUADRADOI y TRIANGULOI quedan 




I Dibujo creado en la 
pantalla por medio del 
procedimiento 
CUADRAD0 1. Los vértices 
numerados corresponden a 
ios puntos que alcanza la 
tortuga tras ejecutar cada 
una de las sucesivas 
órdenes FORWARD 50, 




El procedimiento 
TRIANGULO 1 instruye a la 
tortuga para que trace en la 
pantalla el dibujo ilustrado . 
La ejecución de cada una 
de las tres órdenes 
FORWARD que en él 
intervienen conducen a la 
tortuga a los distintos 
vértices del triángulo. 



definidos ambos dibujos en el campo de 
trabajo. Para utilizarlos, no hay más que 
llamar al respectivo procedimiento uti- 
lizando su nombre. Las referidas figuras 
pueden trasladarse a cualquier posición 
de la pantalla. Para ello basta con colo- 
car la tortuga en la posición y orienta- 
ción adecuadas. E incluso puede alte- 
rarse el tamaño de los dibujos. Esto úl- 
timo exige algunos retoques en el pro- 
cedimiento para que sea posible intro- 
ducir la longitud de un lado. Tal valor 
puede introducirse como parámetro de 
entrada al procedimiento. Veamos cuál 
es el aspecto de ambos ejemplos una 
vez convertidos en procedimientos con 
un parámetro de entrada. 

T0 CUADRADO i 
FORWARD i 
RIGHT 90 
FORWARD i 
RIGHT 90 
FORWARD i 
RIGHT 90 
FORWARD i 
RIGHT 90 
END 



En el primer caso (dibujo de un cua- 
drado), la diferencia aparece en el pará- 
metro L, Su cometido es definir la mag- 
nitud del lado del cuadrado, de ahí que 
su valor acompañe a las cuatro órdenes 
FORWARD. 

Análogamente, puede definirse un 
procedimiento capaz de dibujar un trián- 
gulo cuyo lado lo precisará el paráme- 
tro de entrada L, 

T0 TRIANGULO i 
FORWARD :L 
RIGHT 120 
FORWARD i 
RIGHT 120 
FORWARD :L 
RIGHT 120 
END 

En definitiva, los dos nuevos procedi- 
mientos permiten definir el tamaño de 
fa figura a través del valor o parámetro 
que se agrega como entrada al procedi- 
miento. El siguiente ejemplo, CUA- 
DROS, utiliza esta posibilidad para dibu- 
jar en la pantalla un conjunto de cua- 
drados de distinto lado. 



30 




CUADROS no es más que un procedi- 
miento evolucionado, creado a partir de 
a repetición del procedimiento con pa- 
rámetro CUADRADO :L 

“ CUADROS 
CHORADO 20 
CABRADO 40 
: ADRADO 60 
CABRADO 80 
CABRADO 100 

De la misma forma se pueden definir 
: rocedimientos más genéricos. Por 
t triplo, uno que dibuje polígonos regu- 
les dando el número de lados y su lon- 
::jd; tal es el caso del procedimiento 
-I JGONO definido a continuación; 



TO POLIGONO :N:L 

REPEAT :N [FORWARD ;L RIGHT 360/; N] 
END 






- r 


? BOSQUE 

1 _ 






■ Resultado do la ejecución de dos procedimientos de dibujo 
definidos en el texto: PLANTAR y CAMPO T 



5- definición, extremadamente com- 
; = adopta e! aspecto de procedi- 
tt ^nto con dos parámetros de entrada; 
% número de lados del polígono) y L 



(longitud del lado). Un aspecto a seña- 
lar es la presencia dentro del procedi- 
miento del comando REPEAT. Su estu- 
dio detallado tendrá lugar en el capítu- 
lo cuatro de la serie dedicada al LOGO; 
por el momento basta con saber que or- 
denará la repetición de las acciones en- 
cerradas entre corchetes tantas veces 
como Indique el parámetro N. 

Si el número de lados especificado es 



3 ó 4, POLIGONO se comporta como los 
procedimientos TRIANGULO o CUA- 
DRADO, respectivamente. 



Colección de ejemplos 

Para trasladar al terreno práctico los 
conocimientos adquiridos hasta el mo- 



t \ 

é— ó 



< / 

INICIA 

TO INICIA 
CS 

PENUP 
l£FT 90 
FORWARD 100 
RIGHT 90 
PEND0WN 
END 




TRAN5 

TO TRANS :L 
PENUP 
RIGHT 90 
FORWARD :L 
LEFT 90 
RENDOWN 
END 




SUBE 

TO SUBE :L 
PENUP 
FORWARD :L 
PENDOWN 
EJMD 



/ \ 




BAJA 



TO BAJA :L 
PENUP 
BACK :L 
PENDOWN 
END 




BANDERIN 



TO BANDERIN :L 
FORWARD :L 
TRIANGULO :D2 
BACK :L 
END 



B ¡ Z neo procedimientos elementales o «de utilidad» adecuados 
| zara la creación de superprocedimientos gráficos i 
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TO CUADROS 

CUADRADO 20 
CUADRADO 40 
CUADRADO SO 
CUADRADO 80 
CUADRADO 100 
END 



<3 



100 




I Ejecución del superprocedimiento CUADROS . Dentro de su definición interviene 
repetidamente un procedimiento { CUADRADO ) cuyo parámetro de entrada 
coincide con eí lado del cuadrado a dibujar. 



procedimientos elementales INICIA, 
BANDERIN, TRANS y PLANTAR para di- 
bujar en la pantalla una escena con cin- 
co banderines: 



T0 CAMPO! 

I Wl CÍA 

BANDERIN 60 
TRANS 50 
PLANTAR 60 
TRANS 40 
PLANTAR 20 
TRANS 60 
PLANTAR 35 
TRANS 40 
PLANTAR 53 
END 



mentó, vamos a poner a trabajar a la dis- 
ciplinada tortuga. 

La siguiente colección de ejemplos 
hará uso de los procedimientos elemen- 
tales o de utilidad INICIA, TRANS, SUBE, 
BAJA y BANDERIN que se detallan en 
el cuadro correspondiente. Los referidos 
procedimientos de utilidad entrarán a 
formar parte de la definición de super- 
procedimientos más evolucionados, ca- 
paces de «instruir» a la tortuga para que 
trace en la pantalla dibujos más elabo- 
rados. 

Al utilizar los cinco procedimientos 
elementales, definidos en el cuadro ad- 
junto, nuestro simpático dibujante — la 
tortuga — debe estar orientada en sen- 
tido vertical y «mirando» hacia el borde 
superior de la pantalla. 

Con esta precaución, la actuación de 
los referidos procedimientos elementa- 
les será la que sigue: 

INICIA: desplaza a la tortuga a la iz- 
quierda de la pantalla, levantando la 
tiza para que no deje trazo al trasladar 
su origen. 

TRANS: traslada a la tortuga tantas 
posiciones a la derecha como indique el 
valor del parámetro L; de nuevo, sin de- 
jar trazo alguno en la pantalla. 

SUBE, BAJA: ambos procedimientos 
permiten alterar la posición vertical de 
la tortuga: hacia arriba o hacia abajo, 
respectivamente. 

BANDERIN: dibuja un banderín del ta- 
maño especificado. 

Con estos procedimientos elementa- 
les, van a dibujarse a continuación va- 
rias escenas, sencillas aunque plena- 
mente ilustrativas de las posibilidades 
que otorgan los procedimientos al tra- 



zado de gráficos en pantalla. Desde lue- 
go, el usuario puede crear su propios di- 
bujos utilizando y alterando alguno de 
los siguientes ejemplos. El primero de 
los ejemplos (PLANTAR), hace uso de 
los procedimientos SUBE, BANDERIN y 
BAJA para dibujar un banderín en Ja 
zona superior de la pantalla 



T0 PLANTAR :L 
SUBE ;L 

BANDERIN 1ÜÜ-f:L/3] 

BAJA :L 

END 



A su vez, CAMPOI, es un procedi- 
miento evolucionado que recurre a los 




Secuencia de pasos necesarios para 
situar a la tortuga en un determinado 
punto de ¡a pantalla. 



A continuación, se desarrollan nue- 
vos ejemplos a partir de POLIGONO. El 
procedimiento CIRCUNFERENCIA parti- 
culariza el procedimiento POLIGONO, 
definido en el apartado anterior, para un 
número grande de lados (30) y calcula 
su longitud partiendo del radio. Este 
procedimiento se utiliza dentro de AR- 
BOL para dibujar la copa. 



TO ARBOL :L 
F0RWARD ;L 
LEFT 90 

CIRCUNFERENCIA :L*3/4 

RIGHT90 

BACK :L 

END 



T0 CIRCUNFERENCIA :R 
POLIGONO 30 (|:R*6.28)/30) 
end 

A su vez, BOSQUE se apoya en eí pro- 
cedimiento ARBOL, situando cada ele- 
mento en la pantalla con la ayuda del 
procedimiento PON. 

T0 PON i 
SUBE i 

ARBOL (100 :L)/3 
BAJA i 
END 

Este último es similar a PLANTAR, 
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aunque recurriendo a ARBOL en fugar 
de a BANDERIN. Su empleo repetido 
dentro del procedimiento BOSQUE da 
lugar a la representación gráfica que 
muestra la correspondiente pantalla. 

10 8QSQUE 
INICIA 
PON 50 
TRANS 40 
PON 20 
TRANS 40 
PON 35 
TRANS 40 
PON 17 
TRANS 40 
PON 65 
TRANS 40 
PON 44 
END 

Cada vez ios dibujos pueden ser más 
y más complejos, al irse enriqueciendo 
con la incorporación de procedimientos 
definidos a base de otros más elemen- 
tales. 

Por ejemplo, introduciendo algunas 
variantes al procedimiento INICIA pue- 
de definirse un nuevo procedimiento 
que denominaremos INI; esta vez, el 
desplazamiento de la tortuga no borrará 
el contenido de la pantalla. 

‘0 INI 
^ENUP 
HOME 
JFT9Ü 
: ÜRWARD 120 
- 6HT 90 
^ENDOWN 
END 

Asociando los procedimientos BOS- 
QUE, BAJA y CASA es posible ya el di- 
bujo de un paisaje en el que aprezcan 
árboles e incluso una casa. 



TO PAISAJE 

BOSQUE 

BAJA 30 

CASA 

PENUP 

HOME 

PENDOWN 

END 





El comando HT hace que ¡a tortuga 
desaparezca de la pantalla. A pesar 
de ello, ésta puede seguir trazando 
dibujos que serán visibles. Para 
restaurar su presencia, es preciso 
utilizar el comando ST. 




A¡ operar en modo cerrado t 
seleccionado con el comando WRAP, 
la tortuga reaparecerá en la pantalla 
por el extremo opuesto ai que ha 
desaparecido. 



La evolución puede seguir en sucesi- 
vas etapas. Por ejemplo, introduciendo 
el procedimiento anterior (PAISAJE) 
dentro de un nuevo superprocedimiento 
capaz de plasmar en la pantalla el di- 
bujo de un pueblo de la mano de la tor- 
tuga LOGO. 

TO PUEBLO 
PAISAJE 
BAJA 40 



CASA 

INI 

BAJA 50 

CASA 

PENUP 

HOME 

PENDQWN 

END 



La tortuga se esconde 



Una vez terminado un dibujo, puede 
ser conveniente evitar la presencia de 
la tortuga. Para conseguirlo, puede des- 
plazarse a la tortuga a una esquina de 
la pantalla. No obstante, el método más 
eficaz es ordenarla que se esconda. Para 
ello, se dispone del comando HT (Hide 
Turtle). Este comando vuelve invisible a 
la tortuga, aunque no impide su movi- 
miento ni altera el modo de dibujo se- 
leccionado (PD, PE, PU o PX), Sí se de- 
sea recuperar su presencia, bastará con 
teclear la orden opuesta ST (Show Turt- 
le). 

Existe otro método para perder el con- 
tacto visual con tan simpático persona- 
je: obligarlo a traspasar los límites de la 
pantalla. Hay dos alternativas para fijar 
dichos límites; éstas coinciden con los 
denominados modo abierto y modo ce- 
rrado. 

En el primero, la pantalla muestra 
únicamente una parte del campo de ac- 
ción de la tortuga, si la tortuga sale de 
esta zona visible o ventana, desapare- 
cerá de la vista del usuario. Este modo 
se selecciona con el comando WINDQW 
(ventana). 

En el segundo caso, modo cerrado, la 
tortuga no puede salir de la pantalla. Si 
intenta evadirse por un extremo, apare- 
cerá de inmediato por el opuesto. Una 
imagen gráfica de tal situación se obtie- 
ne al pensar que la pantalla es una lá- 
mina flexible, a la que doblamos y pe- 
gamos sus lados opuestos; esto es: e! 
borde izquierdo con el derecho y el su- 
perior con el inferior. En tal caso, es ob- 
vio que si la tortuga desaparece por el 
borde superior, reaparecerá de inmedia- 
to por el inferior. Y, análogamente, si se 
ausenta por el Jado izquierdo de la pan- 
talla, reaparecerá instantáneamente por 
el lado derecho. Para optar por este se- 
gundo modo se dispone del comando 
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COLORES DE REPUESTO 




Dependiendo de les propias 
características del ordenador ; la 
tortuga será capaz de utilizar un 
mayor o menor número de tizas de 
colores En todo caso , hay que tener 
en cuenta que ésta sólo puede llevar 
un número reducido de tizas , Para 
que le sea posible utilizar ios 
restantes colores, debe intercambiar 
¡as correspondientes tizas que lleve 
«puestas» en ese preciso instante . 



WRAP (enrollar). Es preciso tener cui- 
dado al usar estos dos comandos pues 
ambos borran la pantalla. 

Es posible que, en determinado mo- 
mento, no se vea a la tortuga y se igno- 
re si está escondida o se encuentra fue- 
ra de la pantalla. En éste y en otros ca- 
sos semejantes, es aconsejable el uso 
de SHOWNP. El operador SHOWNP de- 
vuelve el valor FALSE si se ha ejecuta- 
do una orden HT para obligar al quelo- 
nio a desaparecer. Su ejecución permi- 



te conocer el estado actual, visible o in- 
visible, activado por los comandos ST o 
HT, respectivamente. Si lo que ocurre es 
que la tortuga ha salido de la pantalla, 
pero no se le ha ordenado esconderse, 
SHOWNP responderá con TRUE 



Tizas de colores 



Por el momento se han confecciona- 
do dibujos, más o menos complejos, 
controlando ¡os desplazamientos del 
personaje central del «turtle graphics», 
pero siempre a base de trazos de un solo 
color. Desde luego, los dibujos resulta- 
rían más atractivos si fuera posible co- 
lorearlos. 

En la primera instancia, las posibili- 
dades de elección de color dependen del 
ordenador que se utilice. Al respecto, es 
preciso consultar el manual propio del 
aparato con objeto de aprovechar las 
distintas opciones que brinda. Una vez 
precisadas las posibilidades de color del 
equipo, hay que poner en práctica los 
medios que incorpora el LOGO para 
controlar las tizas de color. 

En principio, hay que señalar que la 
tortuga puede transportar más de una 
tiza. Estas están numeradas para facili- 
tar su identificación. 

Para cambiar la tiza se utiliza la orden 
SETPN, seguida por el numero de tiza 
deseado. Dicho comando permite trazar 
dibujos que aparecerán en la pantalla 
con el color seleccionado. La nueva tiza 
seguirá utilizándose hasta que se cam- 
bie de nuevo su color al ejecutar un 
nuevo comando SETPN. El número ha- 
bitual de tizas que puede transportar la 
tortuga se eleva a tres. Por otra parte, 
en cualquier momento se puede identi- 
ficar el número de tiza en uso, por me- 
dio del operador PN; su ejecución índica 
cuál es el numero de ¡a tiza en acción. 

Lo más frecuente es que el ordenador 
permita utilizar un número de colores 
superior a tres. Para hacer uno de los 
restantes colores será necesario cam- 
biar el juego de las tres tizas que puede 
viajar con la tortuga. El comando que 
reasigna los colores de las tizas es 
SETPC. SETPC exige dos entradas: la 
primera debe coincidir con el número de 
tizas a reasignar, mientras que la se- 
gunda debe ser un número que identifi- 



que a uno de los colores que permite 
utilizar el ordenador. 

El operador PC constituye una herra- 
mienta de ayuda para el usuario en este 
punto, puesto que al utilizarlo acompa- 
ñado por un número de tiza, la máquina 
responderá con el número del color 
asignado a la misma. 



Cambio del fondo 

Al emplear tizas de colores puede 
ocurrir, en algún caso, que se esté pin- 
tando con una tiza cuyo color coincide 
con el color del fondo De darse esta si- 
tuación, los dibujos no resultarán visi- 
bles. Para solventar esta situación, el 
LOGO permite alterar el color del fondo 
de la pantalla. 

El comando adecuado es SETBG (SET- 
BackGround), Al igual que ocurre con 
las tizas, los colores disponibles depen- 
derán de la gama que ofrezca el orde- 
nador. SETBG debe ir seguido por el co- 
rrespondiente número de color. Esta po- 
sibilidad permite alterar con comodidad 
el escenario del dibujo: verde para un 
paisaje campestre, azul para un fondo 
marino o negro para una escena galác- 
tica. 

De nuevo, el usuario puede averiguar 




La orientación definida por el 
comando SETH afecta a la tortuga en 
términos absolutos. Esto es, ¡a 
tortuga girará hasta orientarse en el 
ángulo indicado, medido a partir de 
ia vertical y en el sentido de las 
agujas del reloj. 
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I Efecto sobre la tortuga del comando 
I SETPOS: desplaza a la tortuga en 
I modo absoluto a la posición cuyas 
I coordenadas se incluyen en la lista 
I que acompaña al comando. 

ti cualquier momento cuál es el color 
sel fondo. Para ello cuenta con el ope- 
rador BG (BackGround). BG devuelve el 
arriero correspondiente al color actual 
:e la pantalla. 

El empleo conjunto del comando 
EETBG y del operador BG permite múl- 
- pies posibilidades. Por ejemplo: 

SUM 1 BG 

‘esupera el número de color, le suma 
_'a unidad, y utiliza el resultado para 
Definir el nuevo color de fondo. Con ello, 
:aca vez que se ejecuta esta orden se al- 
era el color de la pantalla, pasando al 
:: or cuyo código coincide con el s¡- 
sulente en número. 



— Identificar la posición y orientación 
actuales. 

— Orientar a la tortuga en dirección al 
nuevo punto. 

— Avanzar el número necesario de uni- 
dades. 

— Girar hasta la orientación deseada. 
El proceso puede simplificarse me- 
diante el uso previo del comando HOME 
(traslado al origen), con lo que la posi- 
ción y orientación inicial de la tortuga 
resultarán conocidas (las iniciales al en- 
cender la máquina). En todo caso, este 
método supone el paso de Ja tortuga por 
el centro de ¡a pantalla. 

Las órdenes para el desplazamiento 
absoluto eliminan toda esta suerte de 
inconvenientes. Con un solo comando, 
SETPOS, es posible situar a la tortuga 
en la posición de la pantalla que se de- 



está situada la tortuga. Al efecto, se dis- 
pone del operador POS; éste devuelve 
una lista conteniendo dichas coordena- 
das. El uso de POS permite almacenar 
Jas coordenadas de un punto de la pan- 
talla para, posteriormente, utilizarlas en 
orden a ubicar en él a la tortuga por me- 
dio de SETPOS. Por ejemplo: 

PENUP 
LEFT123 
FORWARD 73 
MAKE "PUNTO POS 
HOME 
BACK 29 
SETPOS : PUNTO 

En el ejemplo, se selecciona una po- 
sición cualquiera por medio de LEFT y 
FORWARD. Las coordenadas de esta po- 




El comando SETH permite orientar a la tortuga en la dirección y sentido definido 
por el ángulo que constituye su dato de entrada. HEADING es un operador capaz 
de indicar la orientación actual de la tortuga expresándola en grados. 



De lo relativo a lo absoluto 

los desplazamientos producidos por 
zS órdenes FORWARD y BACK se de- 
-cmínan relativos. Este apelativo se re- 
5ere al hecho de que la posición final o 
destino de la tortuga depende de su 
: Tjación de partida. Asimismo, la orien- 
- 3 : ón de la tortuga por efecto de LEFT 
: R1GHT también es relativa: una mis- 
orden LEFT o RIGFIT dejará a la tor- 
-.za en una orientación distinta según 
la orientación inicial o anterior a re- 
:: r la orden. Si lo que se desea es si- 
7^=r a la tortuga en un punto determi- 
-ido y con una orientación específica, 
=s oreciso seguir una serie de pasos: 



see. Esta debe especificarse por medio 
de sus coordenadas, expresadas en for- 
ma de lista. Dichas coordenadas serán 
las cartesianas (eje X y eje Y, en ese 
mismo orden) referidas, por lo general, 
af centro de la pantalla. 

Por ejemplo, la orden SETPOS [60 25] 
coloca a la tortuga a 50 unidades hacia 
la derecha y 25 hacia arriba del origen 
o centro de la pantalla, sea cual fuere 
su posición actual. Como es habitual, si 
la tortuga tiene la tiza activada (bajada), 
aparecerá en la pantalla el trayecto re- 
corrido, que coincidirá con una línea 
recta. En caso de duda, es posible cono- 
cer las coordenadas del punto en el que 



sición se almacenan en la variable PUN- 
TO. A continuación, se utilizan las órde- 
nes FIOME y BACK para alejarse del re- 
ferido punto. Por ultimo, SETPOS ^UN- 
TO restaura a la tortuga en el lugar ele- 
gido. 

Las dos órdenes mencionadas ejecu- 
tan un desplazamiento absoluto defini- 
do por las coordenadas. El uso de coor- 
denadas permite definir un nuevo tipo 
de movimiento: el desplazamiento inter- 
medio entre el absoluto y el relativo. Un 
desplazamiento de este tipo se obtiene 
variando únicamente una de las coorde- 
nadas. El siguiente procedimiento ilus- 
tra tal posibilidad; traslada la tortuga al 
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A guaí que el fondo de ¡a pantalla y las tizas de dibujo, también fa tortuga puede 
adoptar diversos colores. El comando al efecto es SETC, seguido por el número 
correspondiente al color seleccionado . 



El lenguaje LOGO incorpora dos ope- 
radores útiles al efecto, estos son XCOR 
e YCOR. El primero devuelve el valor de 
la abscisa (coordenada X), e YCOR hace 
lo propio con el valor de la ordenada 
(coordenada Y). Utilizando esta nueva 
opción el procedimiento anterior queda- 
rá de la siguiente forma: 



TO SETPOSX :X 
MAKE "Y YCOR 
SETPOS [ :X :Y] 
END 



O mejor aún: 



TO SETPOSX :X 
SETPOS [ X :YC0R] 
END 



punto cuya abscisa (posición X) se indi- 
ca, sin variar su ordenada (coordenada 

Y): 



do es facilitar la reutilización de alguna 
de las coordenadas de la posición inicial 
de la tortuga 



TO SETPOSX :X 
MAKE "Y LAST POS 
SETPOS [ :X :Y] 

EIVD 



El cometido dei operador LAST es ex 
traer la ordenada de la posición actual, 
ésta se utiliza al definir la nueva posi 
ción, asignando a dicho valor a :Y. un 
procedimiento complementario a éste 
será el que altere la coordenada Y H man 
teniendo la posición horizontal (coorde- 
nada X). Respecto al ejemplo preceden 
te, el nuevo procedimiento sustituirá las 
X por Y, las Y por X y LAST por FIRST. 

A continuación se introducen nuevas 
órdenes que permitirán simplificar al 
máximo este procedimiento. Su cometí- 




I El comando SETSP hace que la tortuga se mantenga en movimiento a la velocidad 
especificada. El operador complementario es SPEED: su ejecución 
devuelve el valor de la velocidad de desplazamiento . 
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Los dos próximos comandos simpl ¡fi- 
lan aún más el procedimiento. En rea- 
dad lo reducen a la nada, puesto que 
balizan específicamente dicho cometi- 
Estos son SETX y SETY. Con SETX 
se varía 3a posición horizontal de fa lor- 
iga sin alterar la vertical mientras que 
SETY mantiene la posición horizontal 
inordenada X) modificando la vertical 
coordenada Y). 



Cambio de orientación 

Las órdenes de movimiento presenta- 
cas en los párrafos precedentes, condu- 
:an a un cambio de posición que mañ- 
ane la orientación inicial de la tortuga. 
_cs comandos LEFT y RIGHT, anterior- 
_ ante comentados, se utilizan para un 
:ambio relativo de orientación: ordenaVi 
a giro de ta tortuga en un determinado 
ángulo a partir de la orientación actual. 

D ara ordenar el posicionamiento en 
“ido absoluto se dispone de SETH (SET 
-aading). El ángulo de orientación debe 
ser expresado en grados, tomando como 
:ngen (generalmente) el eje vertical, en 
sentido hacia arriba, y realizándose el 
ira en el sentido de tas agujas del re- 
: Así, por ejemplo, SETH 90 coloca a 
a tortuga mirando hacía la derecha. 
Existe, asimismo, un operador que de- 
^“íve el ángulo de orientación actual 
De a tortuga Este es HEADIINIG; un ope- 
-lorque responde expresando fa orien- 
:ec ón en los términos antes señalados. 



Control de la velocidad 

Jna de las características de la tortu- 
re -asta ahora ignorada, es la posibili- 
leo de alterar su velocidad de movi- 
— ente. Nuestro disciplinado personaje 
tiene por qué permanecer inmóvil, 
t ^3 que puede lanzarse a recorrer la 
"talla con una determinada veloci- 
El comando implicado es SETSP 
SET SPeed). 

D or ejemplo, SETSP 20 hará que Ja 
t"uga camine con una velocidad de 20. 
Lesde luego, su paseo no cesará hasta 
se le asigne una velocidad cero. Si 
e tortuga se encuentra con la tiza «ba- 
ldas ésta irá dibujando su trayectoria 




sobre la pantalla. La orden SETSP no al- 
tera las restantes condiciones definidas, 
sino que mantiene los atributos corres- 
pondientes a posición, número y color 
de la tiza. Cabe notar que la velocidad 
determina un movimiento rectilíneo en 
la dirección apuntada por el eje longitu- 
dinal de la tortuga. 

Es necesario significar las distintas 
reacciones de la tortuga dependiendo 
del modo en el que estén definidos los 
límites de la pantalla. Por ejemplo, si se 
ha seleccionado el modo cerrado (con la 
orden WRAP), se verá a la tortuga apa- 
recer por el punto opuesto a aquél por 
donde ha abandonado la pantalla. En el 
caso de que la tortuga tuviera una orien- 
tación oblicua con respecto a los ejes de 
coordenadas, ésta no correría siempre 
la misma línea diagonal. 

Cuando se opta por la pantalla de lí- 
mites abiertos {WIIMDGW), [a tortuga de- 
saparece del campo visual y continúa 
avanzando hasta llegar af final del te- 
rreno disponible. La extensión de este 
terreno depende de la capacidad propia 
del ordenador. Asimismo, las velocida- 
des máxima y mínima admisibles vienen 




impuestas por las características del 
equipo. 

Como ya es habitual, el LOGO dispo- 
ne de la función opuesta. El operador 
SPEED es el encargado de devolver el 
indicativo de la velocidad actual. El si- 
guiente procedimiento muestra la ac- 
ción de las dos órdenes presentadas. 

TO EJEMPLO 
WRAP 

MAKE "A [ACELERA] 

CORRE 

END 



Como se observa, el procedimiento 
EJEMPLO incluye en su definición a dos 
procedimientos elementales, ACELERA 
y CORRE; a su vez, éste último engloba 
a un tercer procedimiento elemental: 
DECELERA. Todos ellos aparecen defi- 
nidos a continuación. 



El LOGO permite el uso simultánea de vanas tortugas Habitualmente , son cuatro 
tas tortugas utilizadles. Para permitir su control éstas se identifican 
con un número comprendido entre cero y tres. 
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TO ACELERA 

TO CORRE SETSP SPEED+2 

IF SPEED>100 [MAKE"A[DECELERA] END 

RUN :A 

IF SPEED<1 [STOP] TO DECELERA 

£ND SETSP SPEED-2 

END 

La ejecución del procedimiento 
EJEMPLO hara que la velocidad de la 
tortuga aumente de O a 100, en pasos 
de 2 unidades. Al llegar a una veJociad 



TABLA DE ORDENES DEL «TU RILE GRAPHICS» (1) 




Instrucción 


Cometido 


Operador/ 

Comando 


HT 


Esconde a la tortuga 


i Comando 


SI 


Muestra a 9a tortuga 


Comando 


SHOWMP 


Devuelve TRUE si la tortuga es visible 


Operador 


WIN DOW 


Activa el modo en el que la pantalla sólo representa una 
parte del campo de la tortuga 


Comando 


WRAP 


Activa el modo cerrado en el que la tortuga no puede salir 
de la pantalla 


Comando 


SETPI\I<NT> 


Utiliza la tiza número <N7> 


Comando 


SETPC<I\ITXNC> 


Adjudica a la tiza <NT> el color <NC> 


Comando 


SETBGCNO 


Pone el fondo de color <NC> 


Comando 


PN 


Devuelve el número de tiza utilizado 


Operador 


PC<NT> 


Devuelve el número del color de la tiza <N1> 


Operador 


8G 


Devuelve el número del color de fondo 


Operador 


<MI>: número de tiza. 
<NC>: número de color. 







TABLA DE ORDENES DEL «TURTLE GRAPHICS» (2) 


Instrucción 


Cometido 


Operador/ 

Comando 


SETPOS<lista> 


Sitúa a la tortuga en la posición dada por las coordenadas 
de la lista 


Comando 


POS 


Devuelve una lista conteniendo fas coordenadas del punto 
donde se encuentra ía tortuga 


Operador 


XCOR 


Devuelve el valor de la coordenada X del punto adual 


Operador 


YCOR 


Devuelve el valor de la coordenada Y del punto actual 


Operador 


SETX<numero> 


Sitúa a la tortuga en el punto de coordenada X, dada por 
<número>, sin variar su coordenada Y 


Comando 


SETY<número> 


Sitúa a la tortuga en el punto de coordenada Y, dada por 
<número>, sin variar su coordenada X 


Comando 


SETH<número> 


Sitúa a la tortuga con la orientación dada por <numero> 


Comando 


HEADING 


Devuelve la orientación actual de la tortuga 


Operador 



mayor que 100, la tortuga empezará a 
decelerar, hasta que su velociad vuelva 
a ser cero. Las instrucciones RUN e IF 
utilizadas en el procedimiento CORRE 
se describirán en un capítulo posterior 
dedicado al estudio de los bucles. 



Dibujando con varias tortugas 

Una sorpresa agradable la constituye 
e! hecho de que la tortuga pueda tam- 
bién actuar en equipe. El LOGO permite 
trabajar simultáneamente con más de 
una tortuga en escena 

Habitualmente, el número máximo de 
tortugas es de cuatro, identificadas con 
los números del cero al tres. La tortuga 
con la que se ha trabajado hasta ahora 
es la número cero. Para que entren en 
juego las demás, es preciso «llamarlas» 
por medio del comando TELL (decir, «dile 
a»_). Este comando se emplea también 
para comunicar una orden a una tortu- 
ga específica. 

Por ejemplo, TELL 1 hace aparecer a 
la tortuga número 1; a su vez, las órde- 
nes que sigan serán obedecidas por Ja 
última tortuga invocada (en este caso, 
la número 1). Si se pretende que las ór- 
denes afecten simultáneamente a va- 
rias tortugas, habrá que advertir de ello 
a los quelonios. Por ejemplo, para que 
las tortugas «actuantes» sean las dos 
primeras, habrá que empezar tecleando 
TELL [0 1]. En general, es preciso for- 
mar una lista con los números de Jas 
tortugas que deban obedecer al tiempo 
las mismas órdenes, y llamarlas con un 
comando TELL 

Las últimas tortugas invocadas con 
TELL se denominan tortugas en curso , 
por ser ellas las que obedecen las órde- 
nes posteriores. Si se invoca a varias 
tortugas situadas en distintas posicio- 
nes de la pantalla, lo que se les mande 
dibujar lo ejecutarán todas ellas a la 
vez, aunque cada una en la zona que le 
corresponda. Cambiando de tortuga en 
curso, es posible controlar a cada una 
de ellas por separado. 

Para identificar a la tortuga o tortugas 
que están actuando en un determinado 
momento, hay que hacer uso de! opera- 
dor WHO (quien). Su ejecución respon- 
de con el número de la tortuga o tortu- 
gas invocadas en último lugar. Este ope- 
rador resulta útil para dar órdenes dis- 
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TABLA DE ORDENES DEL «TURTLE GRAPHICS» (3) 


Instrucción 


Cometido 


Operador/ 

Comando 


SETSP<número> 


Hace que la tortuga se mantenga en movimiento a la velo- 
cidad dada por<número> 


Comando 


SPEED 


Devuelve la velocidad actual de la tortuga 


Operador 


TELL<nu/l¡s> 


Define qué tortugas serán las actuantes a partir de ese mo- 
mento 


Comando 


WHO 


Devuelve una lista con los números de fas tortugas en curso 


Operador 


EACH...<lista ins> 


Hace que las tortugas en curso ejecuten la lista de instruc- 
ciones, una tortuga después de otra 


Comando 


ASK<nu/lis> 

< lista ¡ns> 


Hace que la o las tortugas especificadas ejecuten las ins- 
trucciones de la lista 


Ambos* 


$ETC<número> 


Pone a la tortuga en curso del color indicado por<número> 


Comando 


COLOR 


Devuelve el número que indica el color de la tortuga en curso 


Operador 


<nu/lis>: número de tortuga o lista de números de tortugas. 

<lista ins>: lista de instrucciones. 

* ASK se comporta como operador o comando dependiendo de la lista de instrucciones que lo acom- 
pañen. 



: ntas a cada tortuga. Por ejemplo, una 
nstrucción del tipo FORWARD 
7HO*10, hará que si la tortuga en cur- 
sa es la uno, ésta avance 1 0 posiciones, 
s es la dos, 20... 



'ortugas bajo control 

P ara dirigir a cada tortuga por separa- 
:: se hace necesario llamarlas alterna- 
- .amente. Ello se puede conseguir con 
^ uso reiterado del comando TELL, o es- 
hiendo procedimientos que utilicen 
Echo comando. 

El siguiente ejemplo cambia la tortu- 
ca actuante por la identificada por el si- 
guiente número. 



TO CAM8IATQR 

IF WH0=3[TELL 0] [TELLWHCH1] 
END 



Cada vez que se ejecute el procedi- 
“iento cambiará la tortuga en curso. 
Ion éste y otros procedimientos seme- 
smes, el programador estará en condi- 
: ones de alterar la situación de las tor- 
cas, para que cada una realice una ta- 
-ea distinta.- Existen también otros co- 
mandos que permiten una mayor flexi- 
: ¡idad en el uso de varias tortugas. Es- 
:os son los que se detallan a continua- 
ción. 

Cuando las órdenes a ejecutar por 
zada tortuga sean idénticas, se puede 
sl ¡izar EACH (cada). La sintaxis de este 
:: mando es la siguiente: EACH <lísta 
instruccionesX Por ejemplo, EACH 
^RWARD 200] hará que cada tortuga 
avance 200 posiciones. La diferencia 
ion la situación normal consiste en que, 
-"□ra, la segunda tortuga no cursa la 
irden hasta que termina de hacerlo la 
zrimera. De no utilizar el comando 
EACH, todas las tortugas «acatarían^ la 
:rden a la vez. 

La principal utilidad de EACH radica 
su empleo conjunto con WHO. Tai 



combinación permitirá ejecutar órdenes 
distintas a cada tortuga; por supuesto, 
siempre que las órdenes se puedan re- 
ducir a una función del número de cada 
tortuga. 

Por ejemplo, para que cada tortuga 
gire en un ángulo de distinto número de 
grados, se puede introducir la orden: 
EACH [RIGHT WHO*90]. Con el ejemplo 
apuntado más arriba, en el que se utili- 
zaba WHO sin EACH, se producirá un 
error si hay más de una tortuga en ac- 
ción, simultáneamente. Ello se debe a 
que WHO devuelve una lista de núme- 
ros. Sin embargo, cuando actúa en com- 
pañía de EACH, el LOGO se encarga de 



r 



extraer de la lista cada número por se- 
parado. 

EACH no cambia la tortuga en curso 
y sólo actúa con las que estén disponi- 
bles en ese instante. 

El método adecuado para emplear 
una tortuga que no sea la actualmente 
en curso, sin por ello cambiarla, llega 
de la mano de ASK. Este Comando exi- 
ge dos datos de entrada: el primero es 
el número de tortuga y el segundo la lis- 
ta de las instrucciones que ha de «obe- 
decer», Si se desea que las instruccio- 
nes las ejecuten varias tortugas, el pri- 
mer dato debe ser una lista con los nú- 
meros de las tortugas afectadas. 



~\ 



mmmmD 

50 




La misión del comando TELL es definir qué tortugas van a actuar a partir de ese 
instante. Tras llamar a dos tortugas —localizadas en distintos puntos de la pantalla 
o con distinta orientación — por medio del mencionado comando y ordenar un 
determinado movimiento , éstas ejecutarán et desplazamiento por distintas zonas de 
la pantalla, de acuerdo con su orientación y posición de partida. 



39 





El siguiente ejemplo ilustra la actua- 
ción de cada comando. 



TELL[G1] 

PRttíTWHO 

01 

EACH SETX WH0*50] 
ASK 2 [BACK 50] 

mmmo 

0 1 



Como se observa, ASK no altera las 
tortugas en curso. 

Otra posibilidad de ASK radica en su 
empleo como operador. Realmente, la 
acción de ASK es la que defina la lista 




de instrucciones que constituyen su 
dato de entrada. Ello significa que se 
comportará como un operador si la lista 
da un dato de salida. He aquí un ejem- 
plo: 




® 




WHO es el 
operador 
que revela el 
número de 
la tortuga 
llamada en 
última 

instancia. Si 
son varias 
las tortugas 
activas al 
hacer uso 
del 

mencionado 
operador el 
ordenador 
mostrará los 
números de 
todas ellas 



PRINT ASK 1 (POS). 

En este caso, las coordenadas de la 
tortuga 1 constituyen el dato de salida, 

© 





© 



a raíz de lo cual, ASK actúa como ope- 
rador. 

Tortugas de colores 

Al igual que el fondo y las tizas, tam- 
bién las tortugas pueden cambiar de co- 
lor. 

Las instrucciones al efecto son SETC 
y COLOR. SETC, seguido por un núme- 
ro, otorgará a la tortuga o tortugas en 
curso el color especificado por dicho nú- 
mero. 

A su vez, el operador COLOR devuel- 
ve el número o código del color adopta- 
do por las tortugas actualmente en uso. 

Ambas órdenes pueden asociarse tan- 
to con EACH como con ASK. Una obser- 
vación a considerar es que el color de 
las tortugas es totalmente independien- 
te de los colores elegidos para el fondo 
y las tizas, 

¿Una o varias? 

Todas las instrucciones presentadas 
para su ejecución con una sola tortuga 
pueden ser utilizadas con varias, Al res- 
pecto, sólo habrá que prever el uso de 
TELL, con lo que todas les tortugas en 
curso obedecerán las órdenes de! pro- 
grama. Cabe señalar también que por 
medio de ASK y EACH será posible di- 
ferenciar distintas órdenes para cada 



Secuencia de pantallas que ilustran el efecto de las órdenes TELL ASK y EACH , tortuga. 
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LOGO (4) 



asta ahora sólo se 
han analizado a 
fondo las capaci- 
dades gráficas y 
de tratamiento de 
palabras del LOGO, Aunque ambos as- 
pectos son primordiales en este lengua- 
je, queda aún por comentar otra vertien- 
te fundamental: el tratamiento de datos 
aritméticos y lógicos. El ordenador es, 
básicamente, una máquina capacitada 
para realizar cálculos; en consecuencia, 
todo lenguaje de programación debe in- 
cluir un amplio repertorio de instruccio- 
nes aritméticas. 

El cálculo numérico no es una posibi- 
lidad fácil de explotar en el LOGO. Este 
lenguaje, al contrarío de otros como el 
FORTRAN o el propio BASIC, no está es- 
pecialmente orientado al cálculo. No 
obstante, aporta suficientes funciones 
aritméticas para realizar la mayor parte 
de las operaciones habituales. 

En otros capítulos se ha hecho refe- 
rencia a los bucfes, y será en éste don- 
de se tratarán a fondo junto con meca- 
nismos avanzados de decisión. 



Prefijos e infijos 

Las órdenes LOGO pueden ser co- 
mandos u operadores. Las funciones 
aritméticas se encuadran en este se- 
gundo grupo. El primer operador aritmé- 
:¡co a analizar es el de suma, material!- 
zado por medio de la palabra SUM. 
Como todo operador LOGO tiene sus en- 
tradas y salidas. Las entradas de SUM 
se colocan a la derecha de la orden: 
3UM 2 3 es un posible ejemplo. Al igual 
que cualquier otro operador, debe estar 
orecedido por un comando que «recoja» 
su dato de salida. 

Dicha forma de realizar la suma y de- 
volver el resultado se denomina modo 
prefijo, debido a que el operador prece- 
de a los comandos. Este es el método 
habitual de utilizar los operadores en 
lOGO; si bien, puede resultar engorro- 
so en el caso de los operadores aritmé- 
: eos. Esta es la razón de que exista otra 
-osibilidad, el modo infijo* La nueva mo- 
dalidad consiste en colocar el operador 
entre los opera ndos. En tal caso, hay 




Aunque no fue específicamente 
creado para el cálculo matemático , el 
lenguaje LOGO permite programar 
operaciones aritméticas con 
comodidad. 



PREFUG 

sumZ Z 


SUMA 

z 


z¥z 

INFIJO 


+z 



Muchos de los operadores 
matemáticos del LOGO pueden 
adoptar una doble formulación: 
como «prefijo», precediendo a los 
datos a operar : o «infijo», colocado 
entre los operadores. 



que sustituir la palabra SUM por el sig- 
no +, por ejemplo: . 2 + 3. Su efecto es 
idéntico al del ejemplo anterior, aunque 
su significado es más familiar para el 
usuario. 

Entre los operadores que permiten 
ambos modos de formulación, se en- 
cuentran: SUM (+}, PRODUCT (*) y 
EQUALP (=). Junto a los prefijos se in- 
dican, entre paréntesis, los correspon- 
dientes infijos. 



Aritmética 

Las operaciones básicas del LOGO 
son las siguientes: suma (+), resta (-), 
multiplicación {*) y división (/). Todas 
ellas disponen de un operador infijo (en- 



Aritmética y 
estructuras de control 



tre paréntesis). Sólo el producto (PRO- 
DUCT} y la suma (SUM) admiten prefijo. 
Hay que señalar que algunos dialectos 
del LOGO incluyen un prefijo para divi- 
sión, coincidente con la palabra GUO- 
TIENT, 

Los operadores SUM y PRODUCT 
ofrecen, además, la posibilidad de acep- 
tar más de dos datos de entrada. Ello se 
consigue encerrando el operador y sus 
datos de entrada entre paréntesis. Por 
ejemplo: (PRODUCT 2 3 4), cuyo dato de 
salida será 24 (2 x 3 * 4). 

Además de las operaciones elemen- 
tales, el LOGO incluye algunas funcio- 
nes matemáticas complejas. Estas son 
la raíz cuadrada (SQRT) y las funciones 
trigonométricas seno y coseno (SIN, 
CQS). Todas ellas admiten un solo dato 
de entrada y, por lo tanto, deben ser for- 
muladas como prefijos. Otra función útil 
en múltiples casos en REMA1NDER. 
Este operador calcula el resto ocasiona- 
do por la división de los datos colocados 
a su derecha. Es, por lo tanto, un ope- 
rador en modo prefijo. 

Dentro de los operadores aritméticos 
se pueden considerar los de «trunca- 
miento». Es decir, aquellos que extraen 
una parte del número indicado. Estos 
son INT y ROUND. El primero seleccio- 
na la parte entera del dato de entrada, 
mientras que ROUND devuelve el nú- 
mero entero «más cercano» al dato de 
entrada. Para el dato 15.7, INT devuelve 
el valor 1 5; ROUND, por el contrario, da- 
ría como resultado el valor 16. 

Todos estos operadores son utiliza- 
dos, generalmente, para la asignación 
de valores a una variable he aqui algu- 
nos ejemplos. 

MAKE "A 2+3 

MAKE "SUMA SUM :SUMA :DATG 

MAKE "COSACOS :A 

MAKE "RESUL INT (PRODUCT 2 A SIN > 

MAKE J TQN 2+:PE/(5-:A) 

Como puede apreciarse en os ejem- 
plos, es posible encadenar operadores. 
Cuando los operadores enceae^ecos 
sean infijos, se evaluarán pnmero os 
productos y divisiones y más larde, as 
sumas y restas. En la última nea de 
ejemplo, se utilizan parén:es ^ 
el contenido de la variab = ~E sea c - - 
dido por el resultado de 5 - A 3 “r ae 
coloca el paréntesis, se a - re 

cociente de ;PE/5. 
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Números aleatorios 




Las comparaciones do datos en LOGO conducen a dos valores 
de salida de Upo «lógico s TRUE ( cierto } y FALSE (falso) 



EJ lenguaje LOGO dispone también de 
un generador de números aleatorios, 
muy útil en juegos y simulaciones de 
azar El operador RANDOM, seguido por 
un número entero, entregaría un resul- 
tado aleatorio (también número entero) 
comprendido entre 0 y el dato de entra- 
da. Por ejemplo, RANDOM 5 dará como 
dato de salida un entero menor que 5. 



REPEAT 4 (PRINT RANDOM 5) 

2 

4 

3 

2 





I 



El operador RANDOM genera 
un número aleatorio r 
comprendido entre cero y el 
valor especificado como dato 
de entrada. 



Una determinada secuencia de núme- 
ros aleatorios puede ser repetida por 
medio de RERANDOM, La instrucción de 
este comando hace que el ordenador 
«recuerde» la siguiente secuencia alea- 
toria generada; cada vez que se vuelve 
a ejecutar el comando RERAIMDOM, los 
números aleatorios generados serán re- 
petidos en el orden en que lo fueron an- 
teriormente. Para la repetición de una 
secuencia alaeatoria, es imprescindible 
que el argumento de RAMDOM coinci- 
da con el propuesto en la sentencia re- 
cordada. El ejemplo ilustra esta posibi- 
lidad. 

RERANDQM REPEAT 4 (PRJÍMT RANDOM 5) 

1 

3 

4 
2 

RERANDOM REPEAT 4 (PRINT RANDOM 5) 

I 

3 

4 
1 



Aritmética y listas 

La potencia del LOGO en ef trata- 
miento de lisias puede ser aprovechada 
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> © = TRUE 



< © = FALSF 



Funcionamiento de los operadores de relación * mayor que » y * menor que» 



para fines matemáticos. Esta situación 
nace de la posibilidad de tratar listas de 
números. A una lista formada por nú- 
meros pueden aplicársele todos los ope- 
radores mencionados en el capítulo de 
oalabras y listas. Por ejemplo, FIRST {1 
2 3 4) devolverá el número uno. Este 
dato de salida puede ser posteriormen- 
te procesado por operadores aritméti- 
cos. El siguiente procedimiento suma 
los elementos de una lista de números. 

TO SUMA: LISTA 

?: EMPTYP: USTAfOUTPUT 0) (PRINT SUM FIRSTiíSTA 

suma butfirst; lista) 

END 

El significado completo del procedi- 
miento se comprenderá al tratar la re- 
curslvidad en el apartado de bucles. Sir- 
.a de todas formas este ejemplo para 
ilustrar la posibilidad de operar con lis- 
tas de números. 



Comparaciones 



talla aparecerá la palabra lógica corres- 
pondiente. Por ejemplo: PRINT 5 > 6 es- 
cribe en la pantalla la palabra FALSE, 
También se pueden utilizar estos da- 
tos de salida para formar listas, e inclu- 
so procesarlas tal y como se explicó en 



el capítulo dedicado a palabras y listas. 
Los datos lógicos tienen además otro 
significado para el intérprete LOGO. 
Esta segunda característica de las pala- 
bras TRUE y FALSE es la que se detalla 
en el siguiente apartado. 



El mundo está lleno de comparacio- 
nes, derivadas de las diferencias entre 
/os diferentes individuos. Una persona 
puede ser más alta que otra, o más obe- 
sa. En el terreno matemático estas com- 
paraciones son un calco de las del mun- 
do real. En muchos problemas materna- 
: eos resulta imprescindible determinar 
si un número x es mayor que otro y. El 
^QGQ aporta tres operadores de rela- 
ción para la comparación de números: 
mayor que (>), menor que (<) e igual (=). 
^os tres actúan como infijos, aunque el 
:ercero admite también la modalidad 
crefijo; en tal caso su sintaxis es 
EQUALP, El dato de salida de estos ope- 
radores recibe el nombre de dato lógico, 
ruede adoptar el valor TRUE (verdade- 
ro) o FALSE (falso). En esta tesitura, la 
salida de 5 > 6 será FALSE mientras 
que la de EGUALP 5 5 será TRUE, 

Otros operadores de este tipo —con 
dato de salida de tipo lógico — han sido 
estudiados en capitulares anteriores: 
JSTP y WÜRDP al hablar de palabras y 
stas, NAIV1EP, al hablar de variables: 
3H0WNP en los TURTLE GRAPHICS... 

Los datos de salida de tipo lógico son 
palabras manejables por el LOGO. De 
hecho., si se precede un operador de este 
tipo por un comando PRINT, en la pan- 
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MARTILLOS 
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MARTILLOS 
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MARTILLOS 
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MARTILLOS 
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MARTILLOS 


© 


MARTILLOS 
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CLAVOS = TRUE 
CLAVOS = TRUE 

CLAVOS = FALSE 
CLAVOS = TRUE 

CAVOS = FALSE 
CLAVOS = TRUE 

CLAVOS = FALSE 
CAVOS = FALSE 



Salida generada pot los apeladores lógicos AND y Ofí ante 
diversas combinaciones de datos de entrada. 
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-CINE— >, 

ADULTOS 300 
\ SOS 150 


IF PEPE = •'ADULTO [MAKE "ENTRADA 
300] [MAKE “ENTRADA 150] 






MAKE " ENTRADA 300 




o 




í f 

; PEPE = "ADULTO 




cz 


ti 


M 


FALSE 


MAKE "ENTRADA 150 



IF es una orden LOGO adecuada para bifurcar el flujo normal de control de un 
programa , de acuerdo con el cumplimiento de una condición. En el ejemplo, la 
rendición ADULTO determina qué dato se asignará a la variable 'ENTRADA ", 



A :B :C 




RUN es una nueva orden LOGO especializada en la ejecución de una lista de 
instrucciones. Esta lista, incluida como dato de entrada de RUN, puede verse 
reemplazada por la correspondiente variable representativa de la lista a ejecutar. 



lando al principio, Ja primera frase será 
cierta si el individuo come ambas cosas, 
carne y patatas, y falsa si deja de comer 
alguna de ellas. Por el contrario, la se- 
gunda frase será cierta siempre que 
coma alguna de las viandas menciona- 
das y falsa sólo en el caso de que no se 
coma ninguna de ellas. 

Las tablas adjuntas muestran la sali- 
da que proporciona pada uno de estos 
operadores para el conjunto de posibles 
combinaciones de entrada. 

Como quiera que su salida es otro 
dato lógico, resulta evidente que estos 
operadores puedan ser encadenados, 
obteniendo así funciones más comple- 
jas. Por ejemplo, la posibilidad de comer 
«sopa y carne o pescado, o arroz y carne 
con patatas» se formularía de la siguien- 
te forma: OR (AND :SOPA OR :CAR- 
NE:PESCADG] (AND :ARROZ AND CAR- 
NE: PATATAS). 

La certidumbre de dichos enunciados 
dependeré del valor lógico de las varia- 
bles :SOPA, :CARNE, etc. 

Existe un tercer operador lógico. Este 
actúa sobre un dato lógico, negándolo, 
esto es, invirtiendo su valor lógico. El 
mencionado operador se denomina NOT 
(no) y su tabla correspondiente es la que 
aparece en la figura. 

Como se puede apreciar en la tabla, 
el operador NOT admite un único dato 
de entrada, entregando el valor lógico 
contrario. 

Estos tres operadores son suficientes 
para relacionar todo tipo de enunciados. 



Operadores lógicos 

Una de las teorías matemáticas más 
utilizadas en el mundo de los ordenado- 
res es la denominada álgebra de propo- 
siciones o álgebra de Boofe. Esta parte 
de la matemática moderna se ocupa de 
las relaciones entre los enunciados ló- 
gicos. En ella existen dos operadores ló- 
gicos fundamentales AND (y) y OR (o). 
El cometido de ambos salta a la vista al 
evaluar la diferencia entre la frase «co- 
meré carne y patatas» y la frase «come- 
ré carne o patatas». 

Al tratar con datos de tipo lógico es 
cuando estos operadores cobran impor- 
tancia, La instrucción AND :B=0 :C-0 



dará el valor TRUE cuando ambas varia- 
bles B y C valgan cero. Realmente, los 
datos de entrada al operador AND son 
datos de tipo lógico; en el caso del ejem- 
plo, coinciden con los datos de salida de 
dos comparaciones. 

Sí tanto B como C valen cero, el ejem- 
plo anterior equivale a la instrucción 
AND TRUE TRUE. Por el contrario, si C 
tuviese un valor distinto de cero, el equi- 
valente sería AND TRUE FALSE. 

Estas mismas normas rigen para el 
uso de OR. La diferencia radica en que, 
mientras AND exige que sus dos entra- 
das sean TRUE para dar una salida 
TRUE, a OR le basta con que una de 
ellas sea TRUE. En el ejemplo comen- 



Bucles 

Un hecho evidente es que el ordena- 
dor ha sido creado para descargar al 
usuario de Jas tareas rutinarias. Este 
concepto es ampliamente contemplado 
en la programación de bucles. 

En el siguiente ejemplo se utiliza a la 
tortuga para dibujar un cuadrado: 

FORWARD 50 
RIGHT 90 
FORWARD 50 
RIGHT 90 
FORWARD 50 
RIGHT 90 
FORWARD 50 
RIGHT 90 
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Se observa que las instrucciones 
= ORWARD 50 y RIGHT 90 se repiten en 
cuatro ocasiones. El usuario se ve obli- 
gado a teclear cuatro veces las mismas 
crdenes. 

Este hecho queda subsanado con el 
uso de REPEAT, 

El comando REPEAT es la primera or- 
den especializada en la creación de bu- 
:ies. Su presencia simplifica el ejemplo 
interior a su mínima expresión: 

': 3 EAT 4 [FORWARD 50 RIGHT 90] 

En efecto, una sola línea de instruc- 



ción suple a las ocho que constituían la 
primera alternativa para dibujar el cua- 
drado, El comando REPEAT admite dos 
datos de entrada. El primero ha de ser 
un dato numérico que especifica el nú- 
mero de veces que debe repetirse una 
acción. Dicha acción se introduce como 
segundo dato de entrada. Este último 
puede coincidir con una lista de instruc- 
ciones. 

El procedimiento que sigue, POLI, 
hace uso de REPEAT para dibujar un po- 
lígono: 

10 POLI 10NG :NUM 




COND TOUCHING 1 2— TRUE 



La propia tortuga det LOGO puede introducir criterios para bifurcan ia ejecución: 
por ejemplo , a través de la orden COND , es capaz de detectar 
la ocurrencia o no del tipo de colisión definida. 




COND OVER 3 Q|— TRUE 



OVER es un operador LOGO cuyo cometido es devolver el código de colisión entre 
la tortuga número T (3 en el ejemplo), y un trazo creado por medio de un 
determinado número de tiza (tiza número 1 en la figura). 



REPEAT :NUM [FORWARD :LQNG 
RIGHT (360/:WUM)] 

END 

Ef dato LOMG define la longitud del 
lado, mientras que NUM indica el nú- 
mero de lados del polígono. El cuadra- 
do anterior puede también confeccio- 
narse por medio de POLI 50 4, 



Bifurcaciones 

En algún caso, puede ser necesario 
que dentro de un procedimiento se rea- 
licen distintas acciones, dependiendo de 
ciertas condiciones impuestas. Por 
ejemplo, se puede definir un procedi- 
miento que calcule raíces cuadradas 
mediante el operador SQRT: 

TQ RAIZ :N 
PRINT SQRT :N 
END 

Este procedimiento dará error sí el nú- 
mero introducido es negativo (no es po- 
sible hallar la raíz cuadrada de un nú- 
mero negativo). Para evitarlo, puede or- 
denarse que el cálculo de la raíz cua- 
drada se efectúe exclusivamente si el 
número N es positivo, 

TO RAIZ :N 

1F :N>0 [PRINT SQRT :N] 

END 

En este segundo caso sólo se calcula 
la raíz si el número es mayor que cero 
(IM>0) La orden IF sirve para «bifurcan* 
la ejecución. Esta orden admite tres da- 
tos de entrada. El primero corresponde 
a una condición, esto es: a un enuncia- 
do lógico cuya evaluación dará como re- 
sultado un dato de tipo lógico. Depen- 
diendo de sí el valor resultante es TRLIE 
o FALSE, se ejecutará una lista de ins- 
trucciones u otra. Ambas listas de ins- 
trucciones constituyen los restantes da- 
tos de entrada de la orden IF, Siguiendo 
con el mismo ejemplo, veamos cuál es 
el nuevo procedimiento, ligeramente 
más complejo: 

10 RAIZ :N 

IF :W>0 [PRINT SQRT ;N) [PRINT 
[SOLO NUMEROS POSITIVOS!] 

E.ND 
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En el primer caso sólo se utilizó una 
lista de instrucciones, mientras que 
ahora se contemplan ambas posibilida- 
des. Si :N no es mayor que 0, se ejecu- 
tará la segunda lista de instrucciones. 

El enunciado de la condición ha de 
producir un dato de tipo lógico. En con- 
secuencia, este enunciado puede incluir 
todo tipo de operadores lógicos. Aquí es 
donde los operadores AND, GR, NOT ad- 
quieren una importancia especial Su- 
ponga, por ejemplo, que es preciso que 
H sea mayor o igual que 0. Tal condi- 



ción queda plasmada en la expresión si- 
guiente: 

IF OR :N 0 :N =0... 

De igual forma, también está permiti- 
do el uso de otros operadores como 
LISTP, WORDP, SHOWNP, etc., para bí- 
furcar la ejecución. Estos últimos per- 
miten el tratamiento diferenciado de los 
distintos tipos de datos. 

10 RAIZ :N 




IF NOT NUMBERP :N [PRINT [HAY QUE APORTAR UN NU 
MERO]] [IF OR :N>ü:N =0 

[PRINT SQRT :N] [PRINT [SOLO NUMEROS POSITIVOS]] 
END 

Ahora puede verse la utilidad de ope- 
radores como NUMBERP. La ejecución 
de este último procedimiento aparece 
en la siguiente pantalla. 



RAIZ "CUATRO 

HAY QUE APORTAR UN NUMERO 
RAIZ— 4 

SOLO NUMEROS POSITIVOS 
RAIZ 4 
2 

RAIZO 

0 



La instrucción IF actuará como co- 
mando u operador según la naturaleza 
de las órdenes contenidas en las listas. 
En los ejemplos precedentes realizaba 
una acción propia de un comando, de- 
sencadenada por la presencia de PRINT. 
Veamos un nuevo ejemplo en el que ac- 
túa a modo de comando: 



Secuencia de ejecución del procedimiento PASEO 




La programación de tareas repetitivas se realiza recurriendo a los bucles o 
| estructuras cíclicas. El lenguaje LOGO también dispone de órdenes 
adecuadas para la puesta en práctica de este tipo de procesos. 



T0 RAIZOP :N 

IF NOT NUMBERP :N [QUTPUT [HA DE APORTAR UN NU 
MERO]] [IF OR :NX) :N =0 

[0UTPUT SQRT :N][0UTFUT [SOLO NUMEROS POSITIVOS]] 
END 

Su ejecución será: 



PRINT RAIZOP "CUATRO 
HA DE DARSE UN NUMERO 
PRINT RAIZOP — 4 
SOLO NUMEROS POSITIVOS 
RAIZOP 4 

Y0UD0N1SAYWHATT0 

do i/i// rw 2 

PRINT RAIZOP 4 

2 

PRINT RAIZOP 0 

0 



Al actuar en modo operador, IF entre- 
ga un dato de salida. Este dato debe 
constituir la entrada a un comando; en 
caso contrario, el LOGO escribirá en la 
pantalla un mensaje de error. 



46 







Ejecución de una lista 



Tal como se ha estudiado, las órdenes 
REPEAT e IF admiten una lista de órde- 
nes como dato de entrada. En ambos ca- 
sos, la lista incluye las instrucciones a 
ejecutar. 

Cabe observar que el contenido de la 
lista no tiene por qué ser fijo. Es posible 
hacer uso de una variable cuyo conteni- 
do coincida con la lista específica de ór- 
denes. El siguiente procedimiento ilus- 
tra lo indicado: 

TQ NUMBER ;N 

VAKE rj P0SI [PRINT "POSITIVO] 

MAKE "NEGA [PRINT "NEGATIVO] 

- :N<0 :NEGA POS! 

END 

El procedimiento utiliza dos variables 
NEGA y :POSI) para almacenar la lista 
de instrucciones. 

Existe otro comando LOGO adecuado 
para ejecutar una lista de instrucciones: 
RUN. 

Su dato de entrada debe coincidir con 
a lista a ejecutar. Normalmente, la lis- 
ta se verá reemplazada por una variable 
que adecuará su contenido para que se 
ejecute una y otra lista de órdenes 
-OGO. 



TO NUMBER 

MAKE "POSI [PRINT "POSITIVO] 
MAKE "NEGA [PRINT "NEGATIVO] 
IF :N<0[MAKE "L:NEGA] 

[MAKE "LiPOSlj 
RUN :L 
END 




í El procedimiento POLI definido en el 
I texto i incluye un bucle construido 
con la colaboración de la estructura 
[ REPEAT. La figura muestra algunos 
| ejemplos prácticos basados en dicho 
| procedimiento. 



contacto dos tortugas. Las distintas 
combinaciones posibles se codifican por 
medio de un número. Este se añade a 
continuación del operador COND para 
que éste detecte se produce tal evento. 
Los códigos de colisión dependen de 
cada dialecto LOGO; en cualquier caso, 
es posible evitar su empleo gracias a 
otros dos operadores. 

TOUCFIING es un operador que de- 
vuelve el código de la colisión entre dos 
tortugas. Su argumento incluye los nú- 
meros identif ¡cativos de las tortugas de- 
seadas Así pues, para detectar una co- 
lisión entre ¡as tortugas 1 y 2 basta con 
explorar el dato de salida de COIMD 
TQUCHING 1 2. 

Para identificar la coincidencia de po- 
sición de una tortuga y un trazo en la 
pantalla se hace uso de OVER. Así, por 
ejemplo, la siguiente lista de órdenes 
mostrará el valor lógico de la colisión 
de la tortuga 0 con un trazo creado en 
la pantalla con la tiza número 2: 

PRINT COND OVER 0 2 

El dato de salida de COND puede 



PROCEDIMIENTO N 



OUTPUT 



\ 

í 



1 




mmmm 



DATO 






W 

*í 



El comando OUTPUT sirve para canalizar un dato de salida del procedimiento , 
* , Dicho procedimiento se convierte , de esta forma , en operador LOGO . 

Colisiones 



La tortuga también puede introducir 
criterios para bifurcar la ejecución. Al 
margen de las funciones lógicas ya es- 
-.jdiadas, existe una nueva función ade- 
cuada para detectar colisiones. El ope- 
rador COND devuelve un valor lógico in- 



dicando si se produce la colisión defini- 
da. 

Las colisiones pueden ocurrir al coin- 
cidir una tortuga con una determinada 
porción de ¡a pantalla, o al entrar en 



identificarse dentro de una orden IF, 
para bifurcar hacia acciones distintas. 
De esta forma, se puede ejecutar una 
secuencia de instrucciones específica 
cuando se produzca una colisión. 
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Detección instantánea 



E! problema que subyace en el uso 
conjunto de IF y CQIMD, dériva de la ne- 
cesidad de ejecutar dichas órdenes re- 
petidamente. Si Ja colisión se produce 
antes o después de chequear la condi- 
ción, su efecto no se verá reflejado al 
ejecutar el procedimiento. En definitiva: 
la colisión sólo se detecta al ejecutarse 
la cláusula CONO. Se puede utilizar otro 
método para detectar colisiones «en el 
acto». El comando implicado es WHEN. 
Los dos parámetros de entrada de 
WHEN son el código de colisión y una 
lista de instrucciones. Las instrucciones 
de la lista se ejecutarán inmediatamen- 
te, en cuanto se produzca la colisión. 

Veamos un ejemplo ilustrativo de am- 
bos métodos "de detección. 



Un procedimiento recursivo es aquel 
que se flema así mismo. Ello equivale 
a disponer de un número ilimitado de 
procedimien tos análogos 



TQ PASEO 

TELL01 

ST 

OS 

PU 

ASK 0[FQRWARD 50 SETSP 50] 

COLISION 

END 



TO COLISION 

JF CONO TOUCHING 0 1 [ASK 0 [RIGHT 
180 FÜRWARD 10]] 

COLISION 

END 

El primer procedimiento PASEO llama 
a las tortugas O y 1 . La número O se mo- 
verá a una velocidad de 10. A su vez H el 
procedimiento COLISION se encarga de 
detectar el choque entre ambas tortu- 
gas. Cuando esto sucede, la tortuga mó- 
vil (la número 0) da medía vuelta. 

Este mismo ejemplo es programable 
con la ayuda de WHEN: 

10 PASEO! 

TELL 0 1 

ST 

CS 



PU 

ASK 0 [F0RWARD 50 SETSP 50] 

WHEN TOUCHING 01 [ASK 0 [RIGHT Í90D 
END 



La recursividad 

Cualquier lista de instrucciones 
LOGO debe estar encabezada por un co- 
mando, Si lo que se desea es que esa 
lista dé como resultado un dato de sali- 
da, es evidente que éste debe de ser ca- 
nalizado adecuadamente. En este se- 
gundo caso, la lista actúa como un ope- 
rador. 

Existe una orden LOGO especializada 
en «encauzar» datos de salida. La pala- 
bra LOGO que la identifica es OUTPUT. 



T0 RESTA ;M:N 
OUTPUT :M-:N 
END 
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( SIN STOP ) 



TO PROC 1 
PRINT 1 
PROC 2 
PRINT 4 
END 



i 


TO PROC 2 
PRINT 2 
PRINT 3 
END 


— — 





( CON STOP ) 




El uso del comando STOP permite abandonar un procedimiento, antes de que éste 
llegue al fina! de! mismo delimitado por la orden END. 






'A! encontrar ei comando STOP !a ^ 










secuencia de ejecución * sale » fuera 
de! procedimiento. Dada su 
actuación i, STOP resulta adecuado 




BOXES 






para abandonar ia ejecución de un 
bucle recursivo . 









El procedimiento RESTA opera la sus- 
T'aeeión en modo prefijo. En su interior, 
eü comando OUTPUT es quien se encar- 
da de que el resultado aparezca como 
:ato de salida del procedimiento. 

De este modo es posible construir pro- 
cedimientos que actúen como operado- 
res; claro está, estos procedimientos de- 
ten ir precedidos por un comando. 

Además de permitir la creación de 
nuevos operadores, esta característica 
cermite, también, hacer uso de un nue- 
vo concepto: [a recursividad. Este térmi- 
no, muy utilizado en teoría matemática, 
se refiere a la posibilidad de incluir lo 
cefinido dentro de la definición. Para 

jstrar este nuevo concepto, construi- 
remos un procedimiento cuyo cometido 
es definir los números pares de forma 
^ecursiva. El punto de partida se halla 
en la siguiente constatación: 

El número N es par si: 

• N es igual a 2, o 

• N— 2 es par. 

Sin lugar a dudas, este método para 
a detección de números pares resulta 
bastante engorroso para utilizarlo «a 
-iano». No obstante, el ordenador pue- 
be ponerlo en práctica muy fácilmente: 

“3 PAR ;NU 

F:NLb2 [OUTPUT 'TRUE][IF PAR ;NU-2 

ÍÜJTPUT 'TRUE]] 

biD 



El procedimiento empieza comparan- 
do el dato de entrada con el número 2, 
Si no son iguales, se procede a efectuar 
la siguiente comparación; en esta se- 
gunda comparación se vuelve a hacer 
uso de PAR, aunque ahora el dato com- 
parado con el 2 es N— 2. En el supuesto 
de que el número N fuera 6, la ejecu- 
ción coincidirá con la que se expone a 
continuación: 

PAR 6 

!F 1)6*2 



IF 2) PAR 4 

if 2.i ytn 

)F 2.2) PAR 2 

IF 2.21)2=2 

im 

TRUE 

JRUE 

Tal como se observa, el procedimien- 
to PAR se llama a sí mismo en dos oca- 
siones. Es posible que el ejemplo ante- 
rior resulte de ardua asimilación Real- 
mente, el concepto de recursividad exi- 
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Resultado de la ejecución del procedimiento ESPIRA con 
distintos parámetros de entrada 



ge un gran poder de abstracción, En todo 
caso, su comprensión puede verse faci- 
litada con la ayuda de la tortuga. 

El siguiente ejemplo conjuga la recur- 
sividad con el tratamiento gráfico. Se 
trata, exactamente, de dibujar un polí- 
gono espiral. Ello puede conseguirse 
como sigue: 

1. Avanzar la tortuga X posiciones 
(por ejemplo, 5). 

2, Girar un determinado ángulo (por 
ejemplo, 90 grados). 



3. Avanzar 2+X posiciones. 

4. Girar el mismo ángulo señalado 
en el punto 2. 

5. Avanzar 4+X posiciones. 

Las acciones de «avanzar» y «girar» 
pueden agruparse en una lista. Por 
ejemplo: 

[FORWARD :X LEFT 90] 

La referida lista de instrucciones debe 



ejecutarse repetidamente alterando tan 
sólo el valor de :X. 

Apelando al concepto de recursividad, 
el método apropiado se resumirá en Jos 
siguientes puntos: 

a) Ejecutar la lista para un valor de X. 

b) Repetir el método con un valor de 
X superior en 2 unidades al anterior. 

El segundo enunciado implica volver 
al punto «a» con un valor igual a 2 + X. 
Este ciclo se repetirá en sucesivas oca- 
siones, con valores crecientes de X en 
dos unidades por cada recorrido. La 
puesta en práctica de esta secuencia 
equivale a crear un polígono espiral en 
modo recursivo. 

El procedimiento LOGO adecuado, 
presentará el siguiente aspecto: 



T0 ESPI :X 
FORWARD :X 
LEFT 90 
ESPI 2+;X 
END 



El valor inicial de la variable X puede 
ser fijado a voluntad; de acuerdo a su 
magnitud se obtendrán espirales de dis- 
tinto tamaño. Por supuesto, también es 
posible introducir el ángulo a modo de 
variable. E incluso puede escribirse una 
variante del anterior procedimiento que 
aporte una variación en el incremento 
sucesivo del valor de X: 



TO ESPIRA :X :A :! 
FORWARD :X 
LEFT ;A 

ESPIRA :X :A4| :l 
END 



Este último ejemplo permite las más 
variadas figuras, puesto que altera los 



OPERADORES LOGICOS AND, 0R Y NOT 




AND 




0R 




NOT 


DATO 1 


DATO 2 


SALIDA 


DATO 1 


DATO 2 


SALIDA 


DATO 


SALIDA 


TRUE 


TRUE 


TRUE 


TRUE 


TRUE 


TRUE 


TRUE 


FALSE 


TRUE 


FALSE 


FALSE 


TRUE 


FALSE 


TRUE 


FALSE 


TRUE 


FALSE 


TRUE 


FALSE 


FALSE 


TRUE 


TRUE 






FALSE 


FALSE 


FALSE 


FALSE 


FALSE 


FALSE 







TABLA DE COMANDOS LOGO (1) 


Instrucción 


Cometido 


Operador/ 

Comando 


SUM <N1XN2> 


Realiza la suma de los datos de entrada (prefijo) 


Operador 


<N1> + <I\I2> 


Realiza la suma de los datos de entrada (infijo) 


Operador 


PRODUCT <N1XN2> 


Obtiene el producto de los datos de entrada (prefijo) 


Operador 


<N1> » <N2> 


Obtiene el producto de los datos de entrada (infijo) 


Operador 


<N1> - <N2> 


Opera la resta de los datos entre los que se encuentra 
(infijo) 


Operador 


<N1> / <N2> 


Divide los datos que acompañan al operador [infijo) 


Operador 


SQRT <N1> 


Halla la raíz cuadrada del dato de entrada 


Operador 


SIN <N1> 


Calcula el seno del dato de entrada 


Operador 


COS <N1> 


Calcula el coseno del dato de entrada 


Operador 


Nota: <N1 > y <N2> representan datos numéricos. 
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valores iniciales de ángulo, longitud e 
incremento. 



Limitar la recursividacf 

En los ejemplos anteriores, la ejecu- 
ción del procedimiento no tiene fin. El 
procedimiento continúa «llamándose» a 
sí mismo indefinidamente, y sólo se de- 
tendrá Ja ejecución al emitirse un men- 
saje de error: al exceder la variable del 
valor límite permitido. Desde luego, la 
interrupción también puede derivar de 
una orden al efecto dada por el propio 
usuario desde el teclado. 

Normalmente, es necesario «limitar» 
la acción de un procedimiento recursi- 
vo. Ello es posible gracias al comando 
STOP. Su cometido se entenderá con 
mayor claridad dejando al margen, por 
el momento, el tema de la recursividad, 

TGPR0C1 
mi i 
5 R0C2 
3RINT4 
END 

10 PR0C2 
PRINT 2 
PRINT 3 
END 

El primer procedimiento (PROC1 ), tras 
escribir el dato 1, «llama» al segundo 
> PRGC2). Este último mostrará en la 
cantada los números 2 y 3; tras ello, de- 
volverá el control a PRQC1. Acto segui- 
do, proseguirá la ejecución de PROC1 
escribiendo la cifra 4. 

Veamos, en definitiva, cuál es el re- 
sultado de su ejecución: 



PRÜC1 

1 

2 

3 

4 



TABLA DE COMANDOS LOGO (2) 


instrucción 


Cometido 


Operador 

Comando 


RANDOM <N1> 


Genera un número entero aleatorio inferior al valor 
dado 


Operado' 


RERANDOM 


Recuerda la última secuencia generada de números 
aleatorios 


Comanó: 


<N1> > <N2> 


Entrega el dato lógico TRLIE si NI es mayor que N2 


Operado' 


<N1> < <J\I2> 


Proporciona el dato lógico TRLIE si NI es menor que N2 


Operador 


EQUALP <N1> <N2> 


Proporciona el dato lógico TRUE si NI y N2 son iguales 
(prefijo) 


Operador 


<N1>- <N2> 


Proporciona el dato lógico TRUE si NI y N2 son iguales 
(infijo) 


Operador 


AND <L1> <L2> 


Realiza la función lógica AND (Y) entre los datos de en- 
trada 


Operador 


OR <L1> <L2> 


Realiza la función lógica OR (0) entre los datos de en- 
trada 


Operador 


NOT <L1> 


Entrega el valor lógico contrario al dato de entrada (NO) 


Operador 


Nota: <N 1 > y <N2> representan datos numéricos. 






TABLA DE COMANDOS LOGO (3) 


Instrucción 


Cometido 


Operador 

Coman: 


REPEAT <n> <lista> 


Repite n veces las órdenes indicadas en la lista 


Comando 


)F <cond> <l¡sta 1> 
<lista 2> 


Si la condición es cierta se ejecuta la ¡isla 1, en caso 
contrario se ejecuta la lista 2. 


Pepene 
de la sta 


COND <n> 


Devuelve el valor TRUE si la colisión número n se cum- 
ple 


Operador 


TOUCHING <T1> <T2> 


Devuelve el número identificativo de la colisión entre 
las tortugas número TI y T2 


Operado^ 


OVER <Tor> <T¡za> 


Devuelve el código de colisión entre la tortuga número 
T y Ja liza cuyo número se índica 


Operad:' 


RUN <3ista> 


Ejecuta las órdenes indicadas en la lista 


Deper "r 
de la sra 


WHEN <n> <lista> 


Ejecuta la lista en el mismo instante en que se produz- 
ca la colisión número n 


Pepene 
de le ^3 


OUTPUT <dato> 


Coloca su dato de entrada como dato de salida del pro- 
cedimiento en el que se encuentra 


Cominee 


STOP 


Interrumpe la ejecución de un subprocedimiento para 
volver al procedimiento que lo llamó 


Cornal 



Mota: <n>; Dato numérico (número de veces o número de colisión). <tista>, <lista1 > y Clistel' ^ :- 
ta de instrucciones. <Tor>, <T1 > y <T2>: Número de tortuga, <Tiza>: Número de tiza. Cconi Tra- 
dición que genera un número de tipo lógico. 



subprocedimiento PRGC2. Su nuevo as- PRINT 2 
pecto es el siguiente: STOP 

PRINT 3 
END 



Modifiquemos ahora, ligeramente, el 



10 PR0C2 




La recursividad hace gue la secuencia de control entre en un circulo cerrado ; una 
r vez en su interior se diluye el significado de entrada y salida o de principio y final 
de un procedimiento ... ¿Qué fue antes , el huevo o la gallina? 



La alteración queda plasmada por la 
presencia de un comando STOP entre 
tas dos órdenes de escritura, Al ejecu- 
tar de nuevo el procedimiento PROC1, 
la pantalla reflejará el efecto de la mo- 
dificación operada: 



PR0C1 

1 

2 

4 



Como puede apreciarse, la Instrucción 
PRINT 3 no se ha ejecutado. En cambio, 
sí aparece escrito el 4. 

La acción de STOP es devolver eí con- 



trol del procedimiento que efectuó la 
llamada al procedimiento en el que se 
encuentra dicho comando. En otros tér- 
minos: STOP retorna la ejecución al ni- 
vel inmediatamente superior (enten- 
diendo que los procedimientos que «lla- 
man» se sitúan en un nivel superior a 
los «llamados»]. De no existir un nivel 
superior — el procedimiento no ha sido 
llamado por otro—, aparecerá el men- 
saje de error YOU'RE AT TOP LEVEL 
(está usted en el nivel superior). 

Este comando va a resultar muy útil 
en procedimientos recursivos. Al «lla- 
marse» a sí mismos, este tipo de proce- 
dimientos van recorriendo niveles cada 
vez inferiores. 

En los ejemplos anteriores se descen- 
día de nivel indefinidamente. Ahora, con 
la ayuda de STOP, se puede volver a su- 
bir hasta llegar al nivel de partida, he 
aquí un ejemplo sencillo en el que se 
conjuga la recursividad con el uso del 
comando STOP. 



CUENTA :N 

IF :N=Q [PRINT TERO STOP] 

PRINT :N 
CUENTA :N— 1 
PRINT :N 
END 

El comando STOP actúa deteniendo el 
proceso recursivo. Una vez que se ha re- 
gresado al nivel inmediatamente supe- 
rior, ya no se «bajará» de nuevo. Ello se 
debe a que, después de llamar al nivel 
inferior (cuarta línea), e! resto del pro- 
cedimiento no vuelve a efectuar una 
nueva llamada. El resultado de la eje- 
cución adoptara e! siguiente aspecto: 



CUENTA 4 
4 
3 
2 
í 

CERO 

1 

2 

3 

4 

El primer PRINT es el encargado de 
escribir los números en orden descen- 
dente. Al llegar a 0, se escribe «cero» y 
se interrumpe la recursividad. La suce- 
siva vuelta al nivel superior produce la 
cuenta ascendente, cuyos valores lle- 
gan a la pantalla por medio del segun- 
do PRINT. La siguiente «radiografía» de 
la ejecución ilustra el desarrollo del 
proceso. Para no prolongar excesiva- 
mente el ejemplo, se ha tomado el nú- 
mero 2 como dato de partida. 

línea instrucción 



1 CUENTA :N(2) 

2 1F :N=0... (2 00) 

3 PRINT :N (2) 

4 PRINT :N- 1¡1) 

1 CUENTA :N (1} 

2 IF:N=CL(1<>0] 

3 PRINT :N{1) 

4 CUENTA :N- 1(0) 

1 CUENTA :N (0] 

2 IF :N=0 [PRINT TERO STOP] 

5 PRINT :N(1) 

6 END 

5 PRINT :N (2) 

6 END 
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LOGO (y 5) periféricos 




asta el momento, 
el diálogo con el 
ordenador en len- 
guaje LOGO se re- 
ducía a introducir 
as órdenes oportunas a través del te- 
jado. El programador comunicaba, de 
esta forma, sus deseos a la máquina. El 
asaltado podía verse reflejado en la 
pantalla de dos formas: por medio de 
‘razos creados por la tortuga o en forma 
óe palabras (o listas) escritas en la pan- 
illa por medio de instrucciones PHINT. 

En este capítulo se amplían los méta- 
los de comunicación con el aparato; 
desde el control total de textos en pan- 
ela, hasta la posibilidad de introducir 
-atos durante la ejecución de un proce- 
r-miento. También se repasarán los rae- 
mos existentes para el almacenamiento 
-e los programas 




I La dtferencta entre los comandos 

PRINT y TYPE reside en que el JUAN 

primero provoca un salto a la 
Siguiente línea tras escribir Ltt 

el texto indicado LIBROS 



Manejo del texto 

E! comando que se ha utilizado hasta 
ñora para la visualizaron de textos es 
-ilNT. Este admite un dato de entrada 
“-e puede ser una palabra, una lista o 
dato numérico. Por ejemplo: 



PRINT "CRISTINA 
CRISTINA 



Cada vez que se ejecuta una orden 
PRINT, se salta a una nueva línea de 
pantalla. El siguiente procedimiento 
ilustra dicha particularidad. 



TO LEER 
PRINT "JUAN 
PRINT "LEE 
PRINT "LIBROS 
END 



Para visualizar todas las palabras en 
una misma línea, habría que agruparlas 
dentro de una lista; aunque ello no 
siempre es posible. Por lo demás, una 
vez escrita una parte del texto, no cabe 
la posibilidad de proseguir la escritura 
a continuación de la última palabra vi- 
sualizada. 



PRfNT 43 

43 



PRINT [1 2 3 4] 
1234 



Al ejecutar este procedimiento se ob- 
tendrá la siguiente respuesta en la pan- 
talla: 



TO LEER :BUENQ 
PRINT [JUAN LEE] 

IF:BUEN0= "LIBROS [PRINT :BUEN0] 

END 

En el ejemplo, la palabra LIBROS que- 
dará siempre una línea por debajo de las 
restantes. 



LsETCÜRSOR [10 5j TYPE " PEPE) 



ERE? 






La orden SETCURSOR permite 
situar la visuaüzación en 
cualquier punto de la pantalla, 
sin más que especificar las 
coordenadas en su argumento. 



LEER "LIBROS 
JUAN LEE 
LIBROS 
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Para evitar tal circunstancia, hay que 
recurrir a un comando que no ejecute 
un salto de línea después de realizar la 
escritura. Este comando es TYPE El 
ejemplo precedente puede modificarse 
incluyendo el nuevo comando; 

TO LEER BUEWO 
TYPE [JUAN LEE] 

1F:GUEN0= "LIBROS [PRINT ;BUENQ] 

END 




Ahora, su ejecución conducirá a la sí- 
guíente presentación en pantalla: 



El operador RC se utiliza para recoger en un procedimiento 
el carácter introducido a través deí teclado. 




I Recurriendo a ¡a orden KEYP es posible detectar cualquier acción 
que se produzca sobre el teclado. Dicho operador responde con 
TRUE (cierto) cuando se acciona una teda 



LEER "LIBROS 
JUANLEELÍBROS 



El resultado no es del todo satisfacto- 
rio, ya que sería aconsejable dejar un 
espacio en blanco entre las dos últimas 
palabras. Para visualizar dicho espacio 
en blanco, hay que utilizar el signo X 
(backslash). Con esta nueva modifica- 
ción, nuestro reiterado ejemplo quedará 
ya en perfecto orden: 



10 LEER :BUEN0 
TYPE [JUAN LEE] 

TYPE" \ 

IF :BUENQ= "LIBROS [PRINT ;BUEN0] 

END 

visualizando ya el mensaje en la forma 
deseada: 



LEER "LIBROS 
JUAN LEE LIBROS 



En definitiva, TYPE permite encadenar 
datos en la misma línea de presenta- 
ción. Tanto TYPE como PRINT admiten I 
más de un dato de entrada, empleand: 
el método de encerrar los datos y el co- 
mando entre paréntesis. Tal posibilidac 
es la que se ¡lustra a continuación: 

(PRINT Jr JUAN "LEE "LIBROS! 

JUAN 

LEE 

LIBROS 

ITYPE "JUAN "LEE "LIBROS) 

JUANLEELIBROS 

Existe otro comando relacionado cor I 
la visualización de datos. Este eE 
SHOW, Su función es idéntica a Ja óe I 
PRINT, con una única salvedad en la | 
presentación de listas. Veamos ur 
ejemplo. 

PRINT [DIA SEIS DE] PRINT "MAYO 

DÍA SEIS DE 

MAYO 

SHOW [DIA SEIS DE] SHOW "MAYO 
[DIA SEIS DE] 

MAYO 

Por último, cabe mencionar al comar I 
do SETCURSÜR, que permite elegir e 
punto de la pantalla en el que debe err- I 
pezar la próxima impresión. El punto I 
especifica por medio de una lista de nt- 1 
meros: el primero representa la colurr I 
na y el segundo la fila adecuadas. Lc~ I 
valores máximos de ambos parámetros I 
dependerán de la resolución de la par- I 
talla, en modo texto, característica df I 
cada ordenador. 
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Recogida de datos 

Es posible introducir datos durante la 
ejecución de un procedimiento Para 
ello es necesario instruir al ordenador 
oportunamente. La introducción manual 
de datos puede realizarse por medio del 
teclado o a través de un periférico espe- 
cial; joystick {palanca de juegos) o pad- 
dfe {potenciómetro de control). 

En el primer caso se dispone de dos 
operadores adecuados para leer datos 



del teclado; RC y RL. RC (de Read Cha- 
racter H leer carácter) interrumpe la eje- 
cución del procedimiento hasta que se 
pulsa una tecla. Una vez accionada, el 
carácter correspondiente a la tecla pul- 
sada aparece como dato de salida de RC, 
continuando de inmediato la ejecución 
del procedimiento. Cabe señalar que dh 
cho carácter no es visualizado en la pan- 
talla. 

La misión de RL es similar, si bien 
éste operador actúa con fistas (Read 




Los comandos de son ido más elementales y frecuentes en cualquier 
versión de LOGO son BEEP y NQBEEP, Su única misión es la de 
conectar o desconectar el zumbador . 




Algunas versiones de LOGO permiten generar sonidos complejos , por efecto de la 
acción conjunta de dos comandos ; TOOT y SETENV. 



List, leer lista). Con RL es necesario pul- 
sar la tecla RETURN para indicar al or- 
denador que ha finalizado la introduc- 
ción del dato. Los datos tecleados tras 
la ejecución de RL sí aparecen en pan- 
talla. 

Existe un tercer operador especializa- 
do en detectar cualquier acción sobre el 
teclado: KEYP (de key, tecla). Proporcio- 
na un dato de tipo lógico (TRUE) sí, en 
efecto, se ha pulsado una tecla. A dife- 
rencia con Jos anteriores, KEYP no de- 
tiene la ejecución del procedimiento en 
el que se encuentra. El siguiente ejem- 
plo hace uso de KEYP para detectar la 
pulsación de una tecla y de RC para 
identificar cuál es la tecla accionada. El 
objetivo es mover a la tortuga en Jas di- 
recciones vertical y horizontal con las 
teclas W (arriba), Z (abajo), A (izquierda) 
y S (derecha). 

TO MOVIL 
SF KEYP [ANDA RC] 

MOVIL 

END 

TOANDA : NA CIA 
IF ;HACIA- W [3ETH 0] 

JF: HACIAIS [SETH 90] 

IF :HACIA- 7 [SETH 180] 

IF 'HACIA- J A [SETH 270] 

FÜRDWARD 15 
END 



Joysticks y paddles 



Por lo que respecta a la recogida de 
datos procedentes de periféricos espe- 
ciales, la mayor importancia recae en 
las órdenes destinadas a joysticks y 
paddles, los dos periféricos especiales 
más comunes. 

Los operadores implicados son JOY y 
JOYB para el joystick, y PADDLE y 
PADDLEB para el paddle. 

JOY devuelve un número indicativo 
de la dirección en la que se ha despla- 
zado la palanca del joystick,. Estos va- 
lores no son comunes para todos los or- 
denadores, de ahí que, en cada caso, 
haya que consultar el manual propio de 
cada aparato. La misión de JOYB es de- 
tectar la pufsación del botón de disparo 
del joystick, entregando el dato TRUE si 
ocurre tal situación. 
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PADDLE B 




El lenguaje LOGO dispone 
de funciones especificas 
para el control de 
periféricos especiales 
como, por ejemplo , 
mandos de juego y 
tabletas. 




■ En el lenguaje LOGO l el almacenamiento de información 
en las memorias de masa se realiza en forma de archivos. 



El operador PADDLE obtiene un dato 
numérico comprendido entre cero y un 
número positivo máximo. Este dato re- 
presenta el ángulo girado en el botón de 
mando del paddle. La función PADDLEB 
es idéntica a \a de JOYB, con la salve- 
dad de que en este caso el botón es eí 
de paddle. 



Sonidos 

El uso de fas capacidades sonoras del 
ordenador por medio de órdenes LOGO 
no está, en absoluto, estandarizado. 
Existen muy diversas alternativas que 
van desde la versión más simple, que 
sólo dispone de BEEP (inicia un zumbi- 
do) y IMG BEEP (cancela el zumbido), has- 
ta otras más complejas y con un mayor 
surtido de órdenes al efecto. En esta úl- 
tima categoría, suelen estar presentes 
los comandos TOOT y SETENV. El pri- 
mero admite datos numéricos de entra- 
da para establecer la frecuencia y el vo- 
lumen del sonido. A su vez, SETENV 
controla la envolvente para obtener 
efectos sonoros más complejos. Si se 
dispone de equipos con más de un ca- 
nal sonoro, se especificará también el 
canal deseado. Es obvio que dada la dis- 
paridad de dialectos LOGO en este pun- 



to, resulta imprescindible consultar el 
manual específico de cada equipo. 



La periferia del ordenador 

El entorno que rodea al ordenador in- 
cluye todo un abanico de dispositivos 
periféricos. Entre ellos se encuentran 



las impresoras, unidades de disco, de 
casete, etc. En los dispositivos dedica- 
dos al almacenamiento masivo (cintas y 
discos) se suele agrupar la información 
en «archivos». 

Un archivo es un conjunto homogé- 
neo de datos manipulable bajo un nom- 
bre genérico. Los archivos son, pues, es- 
tructuras de datos. 

El primer ejemplo surge con el deseo 
de conservar ios procedimientos crea- 
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dos en un a sesión de trabajo. Es sabido 
que al desconectar el aparato el conte- 
nido de su memoria se pierde. Para evi- 
tar la repetición del mismo trabajo, hay 



que hacer uso de los periféricos de al- 
macenamiento permanente. Los más 
populares son ia cinta y el disco mag- 
nético. Con ellos es posible preservar la 



información contenida en el espac : de 

trabajo. 

El comando que permite aren .ar 2 
información es SAVE. Este neces :e y r 




Los datos de entrada pueden tomarse de un dispositivo El comando SEJWRITE permite 

periférico distinto al teclado: por ejemplo . de una unidad de canalizar ios datos de salida 

disco. E! comando adecuado para seleccionar ¿ hacia otro periférico 

tal posibilidad en SETREAD. distinto de la pantalla. 




El comando SAVE es la herramienta LOGO adecuada para ordenar la transferencia y almacenamiento 
de información en casete . disco e incluso papel (por medio de la impresora conectada al equipo). 










La función EXAMINE " perm/te entrar en /a /np/mdad de /a mamona 
centra/ ote/ ordenador, revela el contenido de !a posición de 
memoria que se indique como parámetro. 



dato de entrada que será una palabra 
identif ¡cativa del archivo creado. En un 
mismo soporte (cinta en casete o disco) 
se pueden guardar varios archivos. Este 
es el motivo por el cual es preciso dife- 
renciarlos con distintos nombres. 

En el caso de que exista más de un 
dispositivo de almacenamiento conecta- 



do al ordenador, es preciso indicar cuál 
de ellos debe memorizar el archivo. La 
identificación de los periféricos suele di- 
ferir de uno a otro equipo; aunque, con 
frecuencia, se suele recurrir a las si- 
guientes letras: C (casete), D (unidad de 
disco) y P (impresora). 

Si el periférico elegido es la impreso- 



ra, se obtendrá una copia en papel del 
contenido del espacio de trabajo. 

El comando que realiza la operación 
contraria es LOAD. Este carga en me- 
moria el archivo especificado por su 
dato de entrada. Así, un espacio de tra- 
bajo grabado con SAVE “TORTU1, se 
puede recuperar con LOAD 'TORTU1. 

El comando LOAD no puede ser utili- 
zado cuando el periférico elegido es la 
impresora. Es obvio que este dispositivo 
acepta datos, aunque no los devuelve al 
ordenador. 



Manejo de archivos 

El manejo de archivos no se limita ai 
almacenamiento de procedimientos. Es 
posible guardar y recuperar datos (nu- 
méricos, palabras y/o listas). Para ello 
se recurre a permutar los dispositivos de 
entrada/salida. 

El comando SETWRITE hace que los 
datos de salida vayan a parar a otro dis- 
positivo distinto de la pantalla. Así, por 
ejemplo, es posible canalizar (os datos 
hacia la impresora, para obtener resul- 
tados fácilmente manejables. El si- 
guiente procedimiento hará que los re- 
sultados de ejecutar el procedimiento 
PROI salgan a través de la impresora. 



TO IMPRE 
SETWRITE JJ P: 
PR01 

SETWRITE [) 
END 



El periférico de salida puede ser una 
unidad de almacenamiento, de disco o 
casete, creándose, de esta forma, archi- 
vos de datos no volátiles. De esta forma 
al ejecutarse una orden PRINT o similar 
(TYPE, SHOW,..) el dato no aparecerá en 
pantalla, sino que será escrito en el ar- 
chivo externo. Para volver a activar la 
pantalla bastará con ejecutar un coman- 
do SETWRITE [] (cadena vacía). 



TABLA DE ORDENES LOGO (1) 


Instrucción 


Cometido 


Operador/ 

Comando 


PRIMT <dato> 


Muestra en pantalla el dato y salta al principio de la lí- 
nea siguiente 


Comando 


TYPE <dato> 


Muestra en pantalla el dato sin saltar de línea 


Comando 


SHOW <dato> 


Muestra en pantalla el dato. Si es una lista aparece en- 
tre corchetes 


Comando 


SETCURSOR <lista> 


Sitúa el siguiente texto a escribir en la posición indica- 
da por la lista de valores 


Comando 


RC 


Devuelve el carácter pulsado en el teclado 


Operador 


RL 


Devuelve la lista introducida por el teclado 


Operador 


KEYP 


Responde con TRUE si en ese instante se pulsa una te- 
cla 


Operador 


JOY[<n>] 


Devuelve un dato indicativo de la dirección en la que 
se desplaza la palanca del joystick 


Operador 


JOYB [<n>] 


Devuelve TRUE si se acciona el botón de disparo del 
joystick 


Operador 


PADDLE [<n>] 


Entrega un dato indicativo del giro dado en el botón de 
control del paddle 


Operador 


PADDLEB [<n>] 


Devuelve TRUE si se pulsa el botón de disparo 


Operador 


BEEP 


Conecta el zumbador 


Comando 


NOBEEP 


Desconecta el zumbador 


Comando 


<dato>; Puede ser una palabra, lista o dato numérico, <)¡sta>: Lista formada por dos números. Indi- 
can las coordenadas X e Y respectivamente. <n>: Número de dispositivo, en caso de admitir la cone- 
xión de más de uno. 
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TABLA DE ORDENES LOGO (2) 


Instrucción 


Cometido 


Opers::' 

Cooaác 


SAVE <arch> 


Guarda el espacio de trabajo en el archivo indicado 


Cofanoc 


LOAD <arch> 


Recupera un espacio de trabajo del archivo indicado 


Cg'-'-o: 


SETWRITE <arch> 


Canaliza los datos de salida hacia el archivo indicado 
(en lugar de hacia Ja pantalla) 


Cc~='o: 


SETREAD <arch> 


Hace que se recojan los datos de entrada del archivo in- 
dicado (en lugar de obtenerlos del teclado) 


Comande 


CATALOG 


Muestra los nombres de los archivos que residen en el 
disco 


CoraTdD 


ERF <arch> 


Borra del disco el archivo indicado 


Corretee 


.FRIMITIVES 


Muestra todas las palabras reservadas del LOGO 


Corra - tic 


.EXAMINE <pos> 


Devuelve el contenido de una posición de memoria 


Operador 


DEPOSIT <pos><N> 


Introduce el dato <l\í> en Ja posición de memoria es- 
pecificada 


Corroe 


.CALI <pos> 


Ejecuta la rutina en código máquina situada en la po- 
sición de memoria especificada 


COTo^CC 


<arch> Nombre de archivo; junto al mismo hay que indicar el dispositivo en el que se encuentra. <pos>; V:h*=r: 1 

identifica una posición de memoria del ordenador. <N>: Dato numérico a situar en una posición de memore -a 
ser entero, positivo e inferior a 256. 








■DEPOSIT 23000 H7 K 

El comando " DEPOSIT" se encarga 
de depositar un dato en la posición 
de me mona que se le indique 




FORWARD BACK HOME 
ERASE RECYCLE 
REPEAT EDIT WORDP 
LAST BUTFIRST 



J 

Otra de las posibilidades del LOGO 
se concreta en el examen de las 
palabras resecadas. Para obtener un 
listado de todas ellas hay que hacer 
uso del comando "PRIMITIVES" 



El método para recuperar un archivo 
oasa por permutar el teclado con dicho 
archivo. Esta acción se define indicando 
el archivo de entrada en un comando 
SETREAD. Una vez seleccionado el ar- 



chivo, cada vez que se ejecute una or- 
den RC o RL los datos se tomarán del 
mismo, en lugar del teclado. La devolu- 
ción del control al teclado se realiza por 
medio de la orden SETREAD []. 

Existen otros dos comandos específi- 
cos para la operación con disco magné- 
tico. Estos son CATALOG y ERF. 

El primero proporciona una tabla que 
relaciona todos los archivos contenidos 
en el disco, mientras que ERF borra ar- 
chivos (ERase File). Este último coman- 
do eliminará el archivo cuyo nombre 
coincida con la palabra incluida como 
dato de entrada de ERF. 

Los dos procedimientos que se rela- 
cionan a continuación operan asocia- 
dos: gestionan el almacenamiento en 
disco y la emisión de un listado por im- 



presora del procedimiento LOGO se 
indique. 

T0 GRABA :P 
MAKE r 'DIS WORD ,J D: :P 
SAVE :DIS 
SETREAD :DIS 
SETWRITE J P; 

LISTADO 
SETREAD [] 

SETWRITEfl 

END 

T0 LISTADO :A 
MAKE JH L RL 

IF EMPTYP i [STOP] 

PRINT :L 
LISTADO 
END 




3000 



-3 



RUTINA CODIGO 
MAQUINA 



0 10 0 0 1 
10 110 1 
10 0 111 
110 0 11 



3 

-o 

— í o 



I EI cometido de ".CALL' es 
transferir el control a una 
rutina en código máquina 
Su dato de entrada 
especifica la posición de 
memoria a partir de la que 
está situada la rutina en 
cuestión. 
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PALABRAS CLAVE DEL LOGO 


Inglés 


Castellano 


Inglés 


Castellano 


TS 


M0D0TEXT0 


SETPC 


PQNCOLOR, PGNCL 


COUNT 


CUENTA 


PC 


COLOR, COLOR LAPIZ 


SUTFIR3T 


MENOSPRIMERQ 


SETH 


PONRUMBO 


FIRST 


PRIMERO 


XCQR 


XCOOR 


SUTLAST 


MENOSULTIMO 


YCOR 


YCOOR 


_AST 


ULTIMO 


HEADING 


RUMBO 


FPUT 


PÜNP, COLOCAPRI 


POS 


DONDE, POSICION 


LPUT 


P0MU r COLÜCAULT 


SETSP 


PÜNVELGCIDAD 


SE 


ORACION, FRASE 


SPEED 


VELOCIDAD 


NUMBERP 


NUMERO? 


WIN DOW 


VENTANA 


1ISTP 


LISTA? 


WRAP 


, ENROLLA 


WORDP 


PALABRA? 


TELL 


DECIR 


WORD 


PALABRA 


WHO 


QUIEN 


EMPTYP 


VACIA? 


EACH 


CADA 


MEMBERP 


PERTENECE? 


ROUND 


REDONDEA 


EÜUALP 


IGUAL? 


INT 


ENT 


CHAR 


ESCRIBECARACTER, 


REMAINDER 


RESTO 


* 


CARACTER 


RANDOM 


AZAR 


ASCII 


NUMCARACTER, ASCII 


SUM 


SUMA 


MAKE 


HACER, ASIGNA 


PRQDUCT 


PRODUCTO 


NAMEP 


NOMBRE? 


SIN 


SENO 


THING 


COSA, ITEM 


eos 


COSENO 


EDI! 


EDITA, REVISAR 


SQRT 


RAIZCUADRADA 


EDNS 


EDNS 


QUOTJENT 


COCIENTE 


TO 


PARA 


TRUE 


CIERTO 


END 


FIN 


FALSE 


FALSO 


ERNS 


SUPNS 


AND 


AMBOS, Y 


ERALE 


SUPTODO 


OR 


UNOUOTRO, 0 


ERP5 


SUPPS 


NOT 


NO 


ERASE 


SUPRIME 


1F 


31 


ERN 


SUPN 


STOP 


PARATE, ALTO 


POAIL 


ET, ESCTODO 


OUTPUT 


RESPUESTA, DEVUELVE 


FOTS 


EP, ESCTS 


RUN 


CUMPLE, EJECUTA 


PO 


El, ESCPROC 


REPEAT 


REPETIR, REPITA 


POPS 


ESCPROCS 


TYPE 


ESCRIBE 


PONS 


EN, ESCNS 


PRINT 


IMPRIME 


RECYCLE 


RECICLA 


SHOW 


MUESTRA 


NODES 


NODOS 


SETCURSOR 


PONCURSOR 


BACK 


ATRAS r RETROCEDE 


RC 


LEECARACTER, LEECAR 


FQRWARD 


ADELANTE 


RL 


LEELINEA, LEE LISTA 


CS 


BORRAPANTALLA 


KEYP 


LC?, TECLA? 


CLEAI M 


BORRA, LIMPIA 


BEEP 


SONIDO 


R1GHT 


DERECHA, GIRADERECHA 


NOBEEP 


SILENCIO 


LEFT 


IZQUIERDA, GIRAIZGUIERDA 


LOAD 


RECUERDA, CARGA 


HOME 


CENTRO 


CATA LO G 


CATALOGO 


PX 


PLUMAINVERSA, 


SAVE 


GUARDA 




LAPIZREVES 


ERF 


ELIMINAARCHIVO 


PE 


PLUMADEBORRAR, GOMA 


.PRIM1TIVES 


PRIMITIVAS 


PD 


CONPLUMA, CONLAPIZ 


.EXAMINE 


.EXAMINA 


PU 


SINPLUMA, SIN LAPIZ 


.DEPOSIT 


DEPOSITA 


HT 

ST 


OCULTATORTUGA 

MUESTRATORTUGA 


.CALL 


.LLAMA 






SHGWNP 


VISIBLE? 


Existen algunas versiones del lenguaje LOGO cuyo vocabu- 


SETBG 

RG 

SETX 


COLORFONDO, PONCF 
FONDO, COLORFONDO 
PX, PONX 


lario de palabras reservadas se encuentra en castellano. 
Aunque los nombres no coinciden en todas las versiones, 
las más utilizadas son las que se exponen en la tabla. Las 
palabras clave se relacionan en el mismo orden en el que 


SETY 


PY, PONY 


se han estudiado a lo largo de los capítulos de Ea obra de- 


SETPOS 


PXY, PONPOS 


dicados al LOGO. 





Primitivas especiales 

En LOGO se denomina primitiva a 
toda palabra clave o palabra reservada 
Estas coinciden con los comandos \ 
operadores propios del LOGO. Algunas 
primitivas tienen un carácter especia! 
éstas son las que van a constituir el ob- 
jeto de los próximos párrafos. 

Las primitivas especiales se caracte- 
rizan poque su nombre comienza por un 
punto. La más inmediata es PRIMITIVES 
cuya misión es Ea de mostrar todas las 
palabras reservadas. Este comando re- 
sulta muy útil para identificar las pala- 
bras claves propias de cada versión del 
LOGO, Un grupo destacable de primiti- 
vas especiales es el que acoge a las que 
afectan a las «interioridades» de la má- 
quina. Dos de ellas se utilizan para ac- 
ceder a posiciones de memoria. Por 
ejemplo, la función EXAMINE admite ur 
dato de entrada numérico y entrega 
como salida el contenido de la posición 
de memoria apuntada por ei referido 
dato de entrada. El comando opuesto es 
DEPOSIT que se nutre de dos datos de 
entrada. El primero determina la pos 
ción de memoria y el segundo el dato e 
almacenar en la misma 

Con estas primitivas y un ligero cono- 
cimiento del código máquina se pueder 
crear rutinas en dicho lenguaje. Para 
encadenar rutinas (creadas por éste c 
otro método) con procedimientos LOGO 
se dispone de la orden .CALL (llamar 
Su efecto no es otro que el de ejecuta' 
la rutina en código máquina situada a 
partir de la posición de memoria espe- 
cificada. La posición se indica como date 
numérico de entrada a la orden .CALL 

Como última primitiva cabe mencio- 
nar a .SETSCR (de SET SCReen, pone' 
pantalla). Este comando define la rela- 
ción entre las posiciones horizontales y 
verticales, ¡o que equivale a fijar la re- 
lación entre Ea resolución vertical y ho- 
rizontal de la pantalla. 

Utilizando SETSCR de forma adecua- 
da será posible ejecutar ¡a representa- 
ción en pantalla para evitar, por ejem- 
plo, que los cuadrados aparezcan come 
rectángulos. El problema cuya resolu- 
ción se encomienda a SETSCR, deriva 
de las diferencias que surgen *en la vi- 
sualización de un mismo trazado por 
parte de distintos receptores de TV do- 
mésticos. 
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Modula — 2 



¿El sucesor del 
Pascal? 



I lenguaje Pascal, 
primero en utilizar 
plenamente Jos 
principios de la 
programación es- 
tructurada, ha servido de base a otros 
muchos, entre ellos el ADA, que preten- 
dían potenciarlo y suprimir sus [imita- 
ciones, Consciente de este hecho, y con 
la experiencia acumulada tras varias 
años de trabajo, su creador, Nicklaus 
Wirth, presentó en 1980 una extensión 
de este popular lenguaje, que denomi- 
nó Modula— 2. 

Modula— 2 expande el Pascal en dos 
direcciones: hacia arriba, alejándose de 
la máquina, a través de la programación 
orientada a objetos; y hacia abajo, hacia 
Ja máquina, con un conjunto de funcio- 
nes de bajo nivel (manipulación de bits, 
etc.) similares a las def lenguaje C. 



Un poco de historia 

La primera pregunta que cabe hacer- 
se acerca de este nuevo lenguaje es: 
¿qué falta hace? En la actualidad exis- 
ten bastantes decenas de lenguajes de 
programación, con distintas orientacio- 
nes, que pueden servir para realizar casi 
cualquier tarea que se proponga un pro- 
gramador, La respuesta es sencilla: en 
los últimos quince años, tanto los cos- 
tes de desarrollo como la complejidad 
del software han crecido enormemente. 
Este hecho, unido a la gran fiabilidad 
que se exige en la actualidad a los pro- 
gramas de ordenador, ha originado lo 
que los científicos e ingenieros conocen 
como da crisis del software». 

Mo es raro que los grandes programas 
de ordenador se terminen fuera de pla- 
zo, presenten fallos de concepción o de 
diseño, o no cumplan totalmente las es- 
pecificaciones pedidas. Paralelamente, 
el proceso de modificación o corrección 
es enormemente complejo, limitándose 
a «parchear» la zona problemática, en la 
esperanza de que el añadido no pertur- 
be la función del resto del programa. 

Los ingenieros de software han ido 
desarrollando, para resolver esta crisis, 
jn conjunto de normas, entre las cua- 
les destaca la necesidad de la sistema- 
‘ zación del proceso creador como prin- 




Ei mundo de la informática cuenta ya con decenas, e incluso tal vez centenares , de 
lenguajes de programación, bien dedicados o de propósito general. ¿ Qué falta hace 
que se continúe investigando para el desarrollo de otros nuevos? 



cipal camino hacia la reducción de cos- 
tes y el incremento de la fiabilidad. 

Uno de los primeros científicos que se 
interesó por las circunstancias antes 
mencionadas fue Nicklaus Wirth, que 
dio a luz en 1 970 el lenguaje Pascal, el 
primero en utilizar al máximo los prin- 
cipios de la programación estructurada. 
Pronto este lenguaje se convirtió en el 
favorito de los profesores, y en la actua- 
lidad se utiliza, entre otros lugares, en 
un gran número de universidades. 



Sin embargo, Pascal no estaba crea- 
do para el desarrollo de software de 
gran complejidad, y pronto se vio la ne- 
cesidad de un lenguaje que lo comple- 
mentara en proyectos de gran altura. 

En 1975, eí Departamento de Defen- 
sa norteamericano juntó un nutridogru- 
po de científicos que, en 1983, puso en 
circulación el ADA, lenguaje que se 
convertiría en el estándar de dicho de- 
partamento. 

Nicklaus Wirth no estaba, mientras 




La aplicación de los ordenadores en proyectos de gran impórtanos : : re 

aviones, manejo de centrales nucleares, dirección de proyectos esos : í eí -are 
precisos unos procesos de diseño que permitan asegurar 
la inexistencia de errores en los programas creados. 



de desarrollo, muchos grandes proyec- 
tos de software. 
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I Ef elemento lógico —el software— ha ido incrementando su participación en el 
coste total de todo sistema informático. Diversos proyectos de investigación buscan 
reducir estos costes a la mínima cantidad posible. 




I La duración de cada una de fas fases de elaboración de un proyecto informático es 
muy desigual. Como se muestra en la figura r las fases de diseño y programación 
son las más largas, La programación estructurada intenta reducir el tiempo 
empleado en cada uno de dichos procesos. 




tanto, ocioso. En 1980 introdujo el Mo- 
dula — 2, una extensión del Pascal pre^ 
parada para el desarrollo de programas 
de gran complejidad, con muchas de las 
capacidades y características de parale- 
lismo encontradas en ADA r y con la cla- 



ridad, sencillez y compacidad del Pas- 
cal. 

Desde entonces hasta nuestros días, 
el Modula— 2 se ha ido extendiendo y 
ganando adeptos. En la actualidad se 
han desarrollado con él, o están en fase 



La estructura de Modula— 2 

Como la mayoría de los lenguajes de 
programación modernos, el Modula— 2 
es un lenguaje de formato libre, esto es, 
no posee restricciones en cuanto al nú- 
mero de espacios o posición de cada 
campo en la línea, como Fortran o Co- 
bo!. 

La sintaxis de este lenguaje es muy si- 
milar a la del Pascal (no en vano ambos 
han sido creados por la misma persona), 
aunque hay algunas diferencias, meno- 
res pero importantes: 

— Modula — 2 distingue, en los iden- 
tificadores, entre mayúsculas y minús- 
cu las; esto es, las variables «MíVaria- 
ble» y «mivariable» son distintas. Esta 
característica aumenta la claridad de los 
programas, aun a costa de incrementar 
ligeramente la dificultad de programa- 
ción. 

— Los comentarios pueden anidarse, 
lo que permite la eliminación temporal 
de zonas del programa sin más que si- 
tuarlas entre dos delimitadores de co- 
mentario. Este hecho facilita enorme- 
mente la depuración del software. 



Algunas diferencias con Pascal 

En un programa en Modula— 2 pue- 
den declararse cinco entidades distin- 
tas: constantes, tipos, variables, proce- 
dimientos y funciones. Los conocedores 
de Pascal echarán de menos las etique- 
tas (labels), suprimidas en este lengua- 
je, ya que no está permitida la ruptura 
del flujo. 

Siguiendo con las diferencias con 
Pascal, un programa en Modula— 2 pue- 
de contener cualquier número de decla- 
raciones de tipos, constantes o varia- 
bles, en cualquier orden. De esta forma 
puede definirse cada identificador cerca 
de la zona en la que vaya a ser usado, 
lo que aumenta la claridad del progra- 
ma. 

Por lo que se refiere a las declaracio- 
nes de constantes, ahora se admite la 
definición de «expresiones constantes» 
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La independencia de la máquina es otro de ios fines que se han propuesto los 
investigadores en software Modula- 2 consigue esta independencia a través de 
módulos especializados en la interacción con ía arquitectura subyacente. 



que relacionan entre sí dos o más valo- 
res ya definidos. Esto permite modificar 
un conjunto de constantes interrelacio- 
nadas sin más que modificar una de 
ellas 



Tipos de datos 

Un «tipo de datos» puede definirse 
como un par <V, 0>, donde 
V es un conjunto de valores, y 



O es un conjunto de operaciones De- 
finidas sobre esos valores. 

Modula — 2 incluye un conjunte te : 
pos predefinidos y permite la deílr. : ; _ 
de otros nuevos por parte d el usl-^c 
N os detendremos ahora brevemente e* 
los tipos similares a los del Pasca ce- 
jando para más tarde los tipos absme:- 
tos de datos, uno de los puntos fiemes 
del nuevo lenguaje. 

Existen seis tipos de datos escala n 
enteros (INTEGER) y cardinales C--Z - 
NA), reales (REAL), booleanos 3CC- 
LEAN), caracteres y cadenas de ira- 
res (CHAR y ARRAY OF CHAR ac- 
tivamente), enumerativos y subrang-S 
Salvada la introducción del tipo - 
nal (enteros positivos), las difere--: 
con Pascal son mínimas, y escapa^ ce 
propósito de presentación genera ce 3 
obra, por lo que no nos detendrer" :s er 
ellas. 

En cuanto a los tipos estructuróla 
datos (tipos compuestos por otrcs 
primitivos), cabe clasificarlos e r - _ - : : - 
de tres categorías: tamaño (de:c' — 
do, como en las matrices, o indete — - 
nado: ficheros), homogeneidad - 

ces frente a registros, por ejemp : 1 • 
métodos de acceso (directo o sacr'- 
cial) Una revisión rápida permite =" cen- 
trar en este lenguaje matrices (A- - - 
registros (RECORD) y conjuntos 5 



MODULE TriangularNumbers; 

(* Este programa calcula los primeros 25 números triangulares #) 
FROM InOut IMPORT WriteCard, WriteLn; 

VAR 

n : CARDINAL; 
tri ! CARDINAL; 

BEGIN 
t r i s — 0; 

FOR ns= 1 T0 25 DO 
tri:= tri + n? 

WriteCard (tri, 4); 

WriteLn; 

END 

END TriangularNumbers; 



La sintaxis de un programa en Modula-2 no difiere mucho de la de uno en PASCAL La razón de este 
parecido es sencilla : el creador de ambos lenguajes es la misma persona: Nicklaus Wirth. 
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En la actualidad existen compiladores de Modula-2 para distintos tipos de ordenadores, personales, minis o mainframes. La 
portabilídad entre unos y otros sistemas es uno de ios principales aspectos buscados por su creador. 



Al contrario que Pascal, Modula — 2 no 
tiene un tipo «fichero» predeterminado, 
sino que ofrece un módulo de biblioteca 
(más tarde veremos qué es esto) que 
permite la utilización de este tipo de es- 
tructuras. 

Como tipo de datos dinámico. Modu- 
la— 2 suministra, al igual que Pascal, el 
«puntero» (PGIMTER); el tratamiento en 
uno y otro lenguajes es muy similar. 

Conversión entre tipos de datos 

La sintaxis de Modula— 2 es, por lo 
que respecta a lo visto hasta ahora, si- 



milar a la del Pascal, con algunas pe- 
queñas, aunque importantes diferen- 
cias. Entre éstas se encuentra la provi- 
sión por parte del primero de un conjun- 
to de operadores para la conversión y 
transferencia entre entidades de distin- 
to tipo. Por conversión se entiende el pa- 
sar un valor de un tipo a otro, mante- 
niendo el valor conceptual y variando la 
representación interna de la máquina 
(por ejemplo, al pasar un entero a real 
se varía la forma de almacenamiento, 
pero se mantiene la categoría «núme- 
ro»), mientras que la transferencia im- 
plica el mantenimiento de la represen- 
tación interna y el cambio del valor con- 



ceptual (como sucede a! hacer una 
transformación entre entero y carácter) 
Para ía conversión de tipos. Modu- 
la — 2 ofrece las funciones TRUISIC (trun- 
car; permite la conversión de un núme- 
ro real a cardinal) y FLOAT (para la con- 
versión de un cardinal a real). Por lo que 
se refiere a Ja transferencia de tipos, es- 
tán disponibles las funciones CHAR 
(transferencia de un cardinal a carácter: 
ORD (conversión en cardinal de cual- 
quiera de los siguientes tipos: carácter, 
booleano, entero, enumerativo o cardi- 
nal), y VAL (transfiere al tipo indicado 
en primer Jugar el valor que señale el 
segundo parámetro). 
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Existe una segunda forma de realizar 
transferencias entre tipos que no tienen 
paralelo en Pascal: cualquier identifica- 
dor de tipo puede usarse como un iden- 
tificador de función para transferir un 
valor de un tipo a otro. La única restric- 
ción a esta regla es que los dos tipos de- 
ben tener la misma representación in- 
terna, Ase por ejemplo, una operación 
del tipo 



entero + cardinal, 

no permitida, puede realizarse de las 
dos formas siguientes: 
entero + INTEGER{cardinal), con lo 
que el resultado es entero, o 
CARDI NAL(entero) + cardinal, que da 
como resultado un cardinal 
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Estructuras de control 



I Un programa modular puede verse de dos formas diferentes: como una suces. ó - 
encadenada de módulos que se ejecutan uno tras otro, o como un conjunto de 
llamadas a subrutinas cerradas y contenidas en cada uno de los módulos. 



Las estructuras de control de cual- 
quier lenguaje de alto nivel pueden di- 
vidirse en tres grupos principales: se- 



cuencia! (ausencia de estructuras de 
control de flujo), alternativo (selección 
entre dos o más posibilidades), y recur- 



sivo/iterativo (programación de bucles 
Modula— 2 ofrece además una instr„:- 
clón de control de flujo muy espec e 






MODULE CharacterCounter ; 

(* Este programa cuenta los caracteres de una línea de entrada *) 
FROM InOut IMPORT 
<# const *) EQL, 

(# proc *) Read, WriteString, WriteCard, WriteLn; 

VAR counti CARDINAL; 
ch : CHAR; 

BEGIN 

counts= 0; 

LOOP 

Read( ch ) ; 

IF ch = EOL TREN EX IT END; 

IF ch O " 

THEN INC < count) 

END 

END; 

WriteString! 'Número de caracteres! *); 

WriteCard! count, 5); 

WriteLn 

END CharacterCounter. 






I Aspecto de un módulo de programa , característica denotada por el identificador MODULE situado 

al comienzo. Pueden observarse fas zonas de importación de estructuras, la construcción LOOP /EXiT/ END t 
y el nombre del módulo repetido al final de éste , 
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DEFINITIQN MODULE ArrayMaxAndMin; 

EXPORT QUALIFIED 

í# type *) RealArray, 

(# proc #) MaxPos „ MinPos? 

TYPE RealArray = ARRAYE 1.. 10003 OF REAL; 

PROCEDURE MaxPos (a: RealArray) : CARDINAL? 
PROCEDURE MinPos (a: RealArray) : CARDINAL; 

END ArrayMaxAndMin; 



Ü — adulo de definición se caracteriza , entre otras cosas, por (a palabra DEFINÍTION antepuesta a MODULE. En él se especifican 
- - jámente ¡os tipos de datos, tas variables , y las cabeceras de los procedimientos ♦ No contiene código. 



HALT que detiene completamente el 
programa y devuelve el control al siste- 
ma operativo. Esta instrucción puede ser 
muy ut aJ detectarse errores que impi- 
da- a continuación y terminación nor- 
ma! dei programa. Debe emplearse con 
infinita precaución y, por supuesto, sin 
abusar de ella para resolver situaciones 
en las que pueda utilizarse cualquier 
oirá forma de control de flujo. 

ua estructura alternativa por excelen- 
cia, ÍF THEN ELSE END, presenta res- 
pecto de su homologa Pascal dos dife- 
rencias sustanciales: la presencia obli- 
gatoria de la cláusula END final, que 
permite evitar la ambigüedad que de 
otro modo surge en la asignación de un 
ELSE en una anidación de íF's, y la po- 
sibilidad de simplificar los saltos mul- 
tiopción mediante la unificación en una 
sola palabra clave, ELSIF, de las cláu- 
sulas ELSE e IF. La otra estructura al- 
ternativa, CASE OF, difiere de su homó- 
nima en tres aspectos esenciales: la se- 
paración entre campos, que utiliza una 
barra vertical, la posibilidad de incluir 
subrangos como etiquetas de selección, 
y la presencia de la cláusula final ELSE, 
para contemplar tos valores de la varia- 
ble de control no especificados como 
etiquetas. 

Las estructuras iterativas no difieren 
significativamente de las ya conocidas 
por un usuario de Pascal, salvo en el 



caso de WHILE DO END y FOR TO DO 
END, donde se ha incluido el END final 
para suprimir la necesidad de utilizar 
sentencias compuestas. En esta última 
estructura, FOR, puede introducirse 
ahora una cláusula opcional, BY r que in- 
dique el incremento de la variable de 
control. 

Se ha añadido además en Modula— 2 
una estructura que, aunque pueda pa- 
recer absurda, es de gran utilidad: ei bu- 
cle infinito, delimitado por LOOP y END. 
Para poder salir de él se emplea la cláu- 
sula EX1T. 



Procedimientos y funciones 

Modula— 2 admite tres clases de sub- 
programas: procedimientos, funciones, 
y módulos. Los dos primeros son simi- 
lares a sus correspondientes en Pascal, 
por lo que nos limitaremos a señalar las 
diferencias más relevantes, mientras 
que los terceros, completamente nue- 
vos, serán discutidos más adelante. 

Las principales diferencias entre los 
procedimientos y funciones de Pascal y 
Modula— 2 aparecen en la sintaxis de 
uno y otro lenguaje. Así, en el segundo 
es obligatoria la lista de parámetros en 
la cabecera, aunque esté vacía; es ne- 
cesario así mismo indicar el nombre del 



procedimiento tanto al principio (en su 
cabecera) como al final, lo que facilita 
la identificación de los distintos END's 
que suelen acumularse en este lugar. 

En Modula — 2 la palabra reservada 
FUNCTION es sustituida por PRGCEDU- 
RE. La distinción entre procedimientos y 
funciones se realiza según el tipo de ca- 
becera: en la de estas últimas aparece 
el tipo de dato que devuelven. 

Otra variación significativa en lo que 
a funciones se refiere es la forma en que 
se devuelven los resultados: a través de 
la cláusula RETURN, en lugar de me- 
diante su asignación al nombre de la 
función. 



Un programa en Modula— 2 

La estructura de un programa en Mo- 
dula— 2 no difiere grandemente de la de 
un programa en Pascal, aunque, como 
veremos, tampoco se asemeja a ella 
como una gota de agua a otra. 

Un programa en Modula— 2 está divi- 
dido en módulos, que pueden ser de 
cuatro tipos distintos: de programa, in- 
ternos, de definición, y de implementa- 
ción. El clásico programa Pascal se co- 
rresponde, con algunas diferencias, con 
un módulo de programa. Veamos esas 
«algunas diferencias»: 
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— En Modula— 2, la palabra reserva- 

I da PROGRAM se sustituye por MODU- 
LE. 

— Un módulo de programa no em- 
plea parámetros. 

I — AI final del módulo debe consig- 
narse obligatoriamente su nombre. 

Por lo que se refiere a la sintaxis, cabe 
señalar que el siempre presente punto 

Í y coma se emplea ahora como separa* 
dor de sentencias, no como terminador 
(de forma similar al lenguaje C. En 
aquel entonces se explicó ya la diferen- 
cia entre una y otra concepciones, por 

I lo que no vamos a entrar ahora de nue- 
vo en ello). 



Procedimientos de entrada/salida 

Las facilidades de entrada/salida de 
Modula — 2 no son implícitas al lengua- 



je, sino que vienen incluidas en un mó- 
dulo especial denominado InOut, lo que 
permite eliminar la dependencia entre 
software y hardware: basta variar dicho 
módulo, en lugar de todo el compilador, 
si se desea ejecutar los programas crea- 
dos sobre otra arquitectura. 

Los procedimientos estándar ofreci- 
dos por InOut son Read (lee un carácter 
del dispositivo de entrada, cualquiera 
que éste sea), Write (escribe un carác- 
ter en el dispositivo de salida), Read- 
String y WriteString (lee o escribe, res- 
pectivamente, una cadena de caracte- 
res), ReadCard y WriteCard (para la lec- 
tura y escritura de cardinales), ReadOct 
y WriteOct (para la lectura y escritura 
de números en octal), y otros varios, 
adecuados a los distintos tipos de datos. 
Están asimismo disponibles los procedi- 
mientos ReadLn y WriteLn, para el cam- 
bio de línea, Done, para indicar el final 
de la entrada (similar al EOF de Pascal), 
y üpenlnput, OpenOutput, Closelnput y 



IMPLEMENTATIGN MODULE ArrayMaxMin; 

PROCEDURE MaxPos (a: RealArray) : CARDINAL? 
VAR 

(# Variables *) 

BEGIN 

Aquí vendría el cuerpo del procedimiento * 
END MaxPos? 

PROCEDURE MinPos (a: RealArray) : CARDINAL? 
VAR 

(# Variables 
BEGIN 

{* Aquí vendría el cuerpo del procedimiento # 
END MinPos; 

END ArrayMaxAndMin- 



CloseOutput para la redirección de la 
entrada y/o la salida. 

Para el trabajo con ficheros $e dispo- 
ne del módulo FileSystem, que provee, 
aparte de la definición del tipo FILE (fi- 
chero), algunas herramientas de bajo ni- 
vel para su tratamiento. 

La biblioteca «estándar» de 
Modula-2 

La reciente creación de Modula — 2 es 
uno de los principales factores que han 
impedido su estandarización, por lo que 
no puede hablarse en puridad de nada 
«estándar» en él. No obstante, la mayo- 
ría de las ¡mplementaciones se basan 
en la definición de Wirth, por lo que acu- 
diremos a elía cuando sea necesario ha- 
blar de características «normalizadas». 

Entre los módulos presentes en todo 
compilador de Modula — 2 deben hallar- 



los módulos de implementación deben contener eí código preciso para efectuar tas distintas tareas 
especificadas en el módulo de definición. Pueden contener así mismo el código de inicialización 
necesario para dar valores a las distintas variables la primera vez que se llame al módulo. 
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El almacenamiento real o físico de los datos en la memoria del ordenador no se 
corresponde con su organización lógica. Para independizar el programa, en lo 
posible, de la máquina , se emplean módulos de enlace, como el módulo SYSTEM. 



se una biblioteca de funciones matemá- 
ticas (MathLíb, que incluye funciones 
como la raíz cuadrada, valor absoluto, 
logaritmo neperiano, etc.), otra para el 
control del almacenamiento en memo- 
ria (Storage, con procedimientos para la 
gestión de punteros), y algunas otras 
como Arithmetic (operaciones con nú- 
meros: máximo, mínimo, etc.), Utilities 
{utilidades varias), etc. 



Módulos: qué y cuáles son 

El módulo es, aparte de la caracterís- 
tica que da nombre al lenguaje, la más 



importante innovación de Modula— 2. 
Como ya se ha indicado, existen cuatro 
tipos diferentes de módulos: de progra- 
ma, internos, de definición y de imple- 
mentación; estos dos últimos suelen en- 
globarse en el nombre genérico de mó- 
dulos «de biblioteca» (library modules). 

Los módulos de programa son progra- 
mas completos, y pueden importar re- 
cursos software de otros módulos. Se 
han comentado ya en un apartado ante- 
rior, por lo que no volveremos sobre 
ellos. 

Los módulos de biblioteca están divi- 
didos en dos partes, que pueden ser 
compiladas separadamente: especifica- 
ción y cuerpo, que se corresponden, res- 



pectivamente, con los módulos de defi- 
nición e implementacion. 

Los módulos internos, por fin, son es- 
tructuras que pueden ser definidas den- 
tro de cualquier programa para facilitar 
su inteligibilidad o limitar el campo de 
aplicación de ciertas estructuras o varia- 
bles. 

La separación del programa en módu- 
los permite la compilación separada: los 
distintos módulos pueden compilarse y 
guardarse separadamente, y al final 
únicamente es necesario montar juntos 
los diferentes módulos que forman un 
programa para obtener éste. De esta for- 
ma cualquier módulo creado se incor- 
pora a la biblioteca de recursos de que 
dispone el programador, lo que evita la 
repetición de estructuras semejantes en 
distintos programas. 

Para la interreiaclón de módulos se 
emplean dos cláusulas especiales: IM- 
PORT, que permite especificar de dónde 
y qué se necesita en ef módulo actual 
(por ejemplo, para poder escribir cade- 
nas de caracteres necesitamos la fun- 
ción WriteString, que se encuentra en 
ef módulo InOut). La sentencia que per- 
mite utilizarla es: 

FRQM InOut IMPORT WriteString; 

y EXPORT, que permite definir las es- 
tructuras de un módulo que podrán ser 
importadas por otro (así, si hemos crea- 
do el procedimiento Alarma y deseamos 
que otros programadores puedan utili- 
zarlo, utilizaremos en el módulo que lo 
contenga la sentencia EXPORT Alarma). 
La exportación puede ser cualificada 
(para utilizar el procedimiento es nece- 
sario mencionar el nombre del módulo 
en el que se encuentra) o no. 

Módulos de biblioteca 

Los módulos de biblioteca son un con- 
junto de módulos de los que el progra- 
mador dispone para introducirlos en su 
programa. Provienen de dos fuentes 
principales: unos pertenecen al sistema 
de desarrollo en Modula — 2, mientras 
que otros han sido creados con anterio- 
ridad por el propio programador. 

Un módulo de biblioteca consta de dos 
zonas bien diferenciadas: la zona de de- 
finición (DEF1NITION MODULE), en Ja 
que se especifican las distintas caracte- 
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rístícas cíe! módulo, los procedimientos 
que contiene, y las estructuras que pue- 
de importar y exportar, y otra de imple- 
mentación (1MPLEMENTATIQN MODU- 
LE), que contiene el cuerpo de los pro- 
cedimientos mencionados en el módulo 
de definición. De esta forma, sí se de- 
sea variar la implementación de un mó- 
dulo no debe recompilarse todo el pro- 
grama , sino sólo ese módulo. Los mó- 
dulos de definición son normalmente 
públicos, de forma que un programador 
pueda conocer de qué estructuras dis- 
pone dentro de él. 

Los módulos de implementación se 
distinguen de los módulos de programa 
en Ja palabra IMPLEMENTATiON que 
antecede a MODULE. Por lo demás son 
exactamente iguales. Una facilidad aña- 
dida a los módulos de implementación 
es que pueden tener código de iniciati- 
zacion, que se ejecutará la primera vez 
que se llame al módulo, de forma que 
las variables, por ejemplo, partan de va- 
lores conocidos. 

Los módulos de biblioteca permiten 
crear estructuras abstractas, similares a 
cajas negras que ofrecen determinados 
servicios, sin importar cómo se imple- 
menta n realmente esos servicios. De 
esta forma se facilita la creación de soft- 
ware y la interacción entre un número 
elevado de programadores. 

Los módulos internos van introduci- 
dos indistintamente en un módulo de 
programa o en uno de implementación. 
Su función es aislar estructuras de da- 



tos, procedimientos, variables o cuales- 
quiera otras estructuras del resto del 
módulo que los contenga, con el fin de 
limitar el campo de visibilidad o para 
mejorar la legibilidad deJ conjunto. 



Abstracción de datos 

El proceso de abstracción puede defi- 
nirse como «identificar los conceptos 
esenciales e ignorar los detalles parti- 
culares», Este proceso es una de las ma- 
yores herramientas conceptuales de 
que dispone un usuario para enfrentar- 
se al problema de la complejidad del 
software, por lo que nos detendremos 
brevemente en él. 

Los tipos predefinidos en Modula — 2 
pueden considerarse como abstraccio- 
nes de datos de bajo nivel. En efecto, 
permiten al programador no tener en 
cuenta aspectos tales como la represen- 
tación interna de los datos o los compo- 
nentes hardware que permiten su alma- 
cenamiento y tratamiento. 

Entre las ventajas de la abstracción 
están la posibilidad de concentrarse en 
ef problema, sin necesidad de recordar 
detalles de Implementación que no son 
necesarios en ese momento determina- 
do. Por otra parte, esta situación permi- 
te asegurar fa integridad de los datos, 
puesto que el usuario no puede modifi- 
car la estructura interna más que a tra- 
vés de las facilidades que se le otorguen 



para ello. La tercera ventaja de la abs- 
tracción es la posibilidad de cambiar Ja 
implementación de la estructura oculta 
sin necesidad de variar el programa en 
consecuencia; únicamente es necesario 
atenerse a la definición de interfaz exis- 
tente. Y cuarto y último, la abstracción 
de datos permite unir en una sola enti- 
dad todos los aspectos relacionados con 
ella, con lo que esto representa en cla- 
ridad y legibilidad. 



Abstracciones de bajo nivel 

Para desempeñar su trabajo, muchas 
veces los programadores necesitan co- 
nocer y utilizar detalles propios de la ar- 
quitectura sobre fa que estén desarro- 
llando software: almacenamiento en 
memoria, manipulación de direcciones 
físicas, etc. Aunque el lenguaje Modu- 
!a-2 ha sido desarrollado para ser inde- 
pendiente de la máquina sobre la que 
esté siendo ejecutado, existe un módu- 
lo que permite utilizar estas caracterís- 
ticas de bajo nivel: el módulo SYSTEM 
(sistema). Su utilización debe hacerse 
con el máximo cuidado, ya que cual- 
quiera de los procedimientos o los tipos 
por él exportados pueden ocasionar la 
pérdida de compatibilidad del programa. 

El módulo SYSTEM ofrece al progra- 
mador distintos tipos y procedimientos, 
entre los que se encuentran; 

— El tipo WORD, que se correspon- 




Normalmente la ejecución de 
un programa es secuencial: las 
subrutinas, módulos, o como 
quiera llamárseles, se ejecutan 
una tras otra , sin tener en 
cuenta el proceso anterior o 
posterior. 
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La capacidad de proceso de ios ordenadores actuales permite ia generación de 

« programas concurrentes, en ios que distintas rutinas se ejecutan de forma 
simultánea. Modula- 2 provee de diversas herramientas para 
el desarrollo de programas de este tipo. 



de exactamente con una palabra de me- 
moria, 

— El tipo BYTE, cuya representación 
en memoria es un byte físico. 

— Los tipos HALFWORD (media pa- 
labra) y LONGWGRD (doble palabra). 

Estos tipos son incompatibles con 
cualesquiera otros admitidos por el Mo- 
dula — 2 o creados por el usuario. La úni- 
ca operación que puede efectuarse con 
ellos es la asignación, Puesto que algu- 
nas arquitecturas pueden no basar su 
distribución de memoria en palabras y 
bytes r algunos compiladores carecen de 
ellos. 

Como dato interesante y muy útil po- 
demos indicar que si en algún procedi- 
miento se pasa un parámetro definido 
como ARRAY OF WORD o ARRAY OF 
BYTE puede asignársele cualquier va- 
riable actual, independientemente de su 
tamaño y tipo. Esta peculiaridad hace a 
estos tipos extremadamente útiles a la 
hora de desarrollar estructuras genéri- 
cas, 

— El tipo ADDRESS (dirección), que 
puede entenderse como un POINTER TO 
WORD. 

— Y, por último, los procedimientos 
ADDR (devuelve la dirección en memo- 
ria de la variable que se le pase como 



parámetro), SIZE (devuelve el tamaño de 
la variable que se le pase como pará- 
metro) y TSIZE (devuelve el tamaño de 
un dato de tipo determinado). Estos pro- 
cedimientos se utilizan preferentemen- 
te para conocer la cantidad de memoria 



Palabras reservadas de Modula— 2 


AND 


LOOP 


ARRAY 


MOD 


BEGIN 


MODULE 


BY 


NÜT 


CASE 


OF 


CONST 


OR 


DEFINIT10N 


POINTER 


DIV 


PROCEDURE 


DO 


GUALIFIED 


ELSE 


RECORD 


ELS1F 


REPEAT 


END 


RETURN 


EXIT 


SET 


EXPORT 


THEN 


FOR 


TO 


FROM 


TYPE 


IF 


UNTIL 


IMPLEMENTATION 


VAR 


IMPGRT 


WHILE 


IN 


WITH 



asignada a una estructura de datos de- 
terminada. 

Trabajando con procesos 

La definición de proceso que cuadra 
en este apartado es «programa en eje- 
cución». Un programa es una estructura 
estática, muerta; un proceso es una es- 
tructura dinámica, en constante evolu- 
ción para producir unos resultados que 
dependen de cómo se ha desarrollado 
el programa que le ha dado vida. 

A menudo es interesante ver un pro- 
grama como un conjunto de procesos 
que se desarrollan simultáneamente. 
Esto se conoce como «programación 
concurrente». Modula— 2 ofrece una se- 
rie de posibilidades para lanzar proce- 
sos desde uno determinado, facilitar la 
interacción entre los procesos padre e 
hijo y, tras la finalización del proceso 
hijo, borrarlo de la memoria del ordena- 
dor. 

Las primitivas para el control de pro- 
cesos dependen de la máquina sobre ía 
que se esté trabajando, por lo que se 
alojan en el módulo SYSTEM, ya co- 
mentado con anterioridad. Entre ellas se 
encuentran el tipo PROCESS (proceso) y 
los procedimientos NEWPROCESS y 
TRANSFER (proceso nuevo y transferir, 
respectivamente). 

En Modula— 2, un proceso es un pro- 
cedimiento sin parámetros, declarado 
en el nivel más alto (no contenido en 
ningún otro procedimiento). Un proceso 
puede tener asociado un conjunto de 
sentencias (el procedimiento sin pará- 
metros) y un área de datos. Una vez que 
se ha hecho la asignación, es posible 
iniciar Ja ejecución del proceso. Pueden 
declararse y lanzarse cuantos procesos 
sean necesarios, y todos se ejecutarán 
simultáneamente. 

Para ejecutar un proceso, o pasarle 
control desde otro, se emplea el proce- 
dimiento TRANSFER, que recibe como 
parámetros los nombres del proceso 
que tiene el control y del que lo recibe. 

La sincronización de procesos puede 
hacerse a través de semáforos, buzones, 
áreas compartidas de memoria, o cua- 
lesquiera otros procedimientos que eJ 
programador crea convenientes. La pro- 
fundidad del tema impide que sea trata- 
do en esta obra de carácter introducto- 
rio. 
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PASCAL (1) 



Las ventajas de la 

programación 

estructurada 




I PASCAL es un 
lenguaje de pro- 
gramación de alto 
nivel, modular y 
estructurado. Ha 
de utilizarse siguiendo una serie de re- 
glas muy precisas, que se detallarán en 
este primero y en sucesivos capítulos. 
Así como todos los lenguajes humanos 
incorporan un conjunto de reglas gra- 
maticales, también existen reglas a las 
que hay que ajustarse para poder dia- 
logar con la máquina en lenguaje PAS- 
CAL. 

Para que un programa sea fácilmente 
comprensible y susceptible de ser mo- 
dificado con posterioridad, debe ser cla- 
ro, inteligible y corto. Estos requisitos 
son fáciles de conseguir en un progra- 
ma escrito en PASCAL, debido a las pro- 
pias características de este lenguaje. En 
PASCAL, los programas se escriben de 
forma secuencial y ordenada. El empleo 
de bifurcaciones incondicionales (insti- 
tuciones que rompen la secuencia de 
ejecución del programa) es desaconse- 
jable, ya que dificultan el análisis y se- 
guimiento del mismo. Al evitar su pre- 
sencia — lo cual es siempre posible — v 
se logrará una ejecución ordenada de 
las instrucciones. Por lo demás, un pro- 
grama en PASCAL se puede dividir en 
pequeños trozos o módulos que otorgan 
una gran flexibilidad al programa en or- 
den a futuras modificaciones. 

Otra característica básica del PASCAL 
es la de ser un lenguaje estructurado. 
Del mismo modo que a partir de los tres 
colores primarios “-rojo, verde y azul—, 
mezclándolos adecuadamente, es posi- 
ble conseguir toda la gama del espec- 
tro; así también, partiendo de tres sim- 
ples estructuras, a saber: secuencial, de 
bifurcación y repetitiva, se puede escri- 
bir cualquier programa. 

El concepto de estructuración se re- 
fiere tanto al programa en sí, como a los 
datos deí mismo. Estos últimos pueden 
estructurarse para reducir la compleji- 
dad de los algoritmos de trabajo, au- 
mentar la claridad del programa y, en 
definitiva, conseguir un mayor rendi- 
miento. 

El programa en PASCAL siempre debe 
ser compilado antes de proceder a su 
ejecución. Ello significa que se traduce 
de una sola vez a lenguaje máquina y 



Eí PASCAL es un Lenguaje informático 
de alto nivel modular y estructurado. 



no instrucción a instrucción, a medida 
que las va procesando. 

El formato de escritura de un progra- 
ma es líbre, de tal forma que las sen- 
tencias pueden colocarse en cualquier 
parte del listado. La única restricción a 
esta libertad es que cada instrucción 
debe terminar con un punto y coma para 
diferenciarla de la siguiente. 

Los espacios en blanco se pueden in- 
sertar libremente, con lo que el listado 
del programa gana en claridad y legibi- 
lidad, al poder utilizar márgenes y varia- 
bles para cada módulo o porción del pro- 
grama. En terminología informática, 
este método se llama mdentación o pro- 
fundidad lógica. 

Las instrucciones se escriben en una 
notación similar al inglés restringido y 
al álgebra. Para ello se dispone de los 
siguientes caracteres reconocibles por 
el ordenador (letras en mayúsculas o 
minúsculas): 



abcdefghijklmnopqrstuvwxyz 
0 1 2 345 6 789 + -*/ = :. ,()'<>;[] 

Hay que destacar la distinción clara y 
precisa que existe entre, por ejemplo, 
los paréntesis y Jos corchetes; cada ca- 
rácter tiene sus aplicaciones concretas 
y en ellas no puede ser sustituido por 
otro carácter similar. 

Para incluir en el listado de arogra- 
ma los comentarios pertinentes, es pre- 
ciso escribir el texto en cuestión ence- 
rrado entre paréntesis y asteriscos; 

(*a que así es más fácír). 
Desde fuego, los comentarios pueden 
emplazarse en cualquier pane del pro- 
grama. 

Identificadores 

Cuando nacemos, nuestros padres 
nos conceden el privilegio de otorgamos 
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Al igual que ocurre con las composiciones cromáticas : partiendo de tres únicas 
estructuras (secuencia!, de bifurcación e iterativa) pueden construirse programas 
PASCAL adecuados para resolver las más diversas aplicaciones. 



un nombre, por el que se nos puede 
identificar el resto de nuestra vida. De 
forma similar, los datos y elementos de 
un programa en PASCAL pueden recibir 
un nombre o identificados por el que se- 
rán reconocidos en lo sucesivo dentro 
del programa. 

El identificador proporciona, además, 
una idea del tipo de dato de que se trata 
y de su aplicación. Por ejemplo, si el 
dato coincide con la cantidad de vino 
producida en una determinada cosecha, 
puede otorgarse a este dato el nombre: 
VINO. Estos identificadores deben cum- 
plir ciertas reglas; por ejemplo, deben 
empezar por una letra, aunque sus res- 
tantes caracteres pueden ser letras o ci- 
fras decimales. Su longitud no está li- 
mitada, si bien, el compilador sólo reco- 



nocerá los ochos primeros caracteres. 
Por ejemplo el identificador HIPOPOTA- 
MOS, bajo la perspectiva del compila- 
dor, coincide con HIPOPOTAMAS. 

Por otro lado, existen palabras con 
significado propio para el compilador 
que no se pueden utilizar como identifi- 
cadores. Estas palabras reservadas reci- 
ben el nombre de delimita dores y tienen 
reservada una misión específica; por 
ejemplo, PROGRAM, BEGIN, IF, END.,, 



Aspecto de un programa en 
PASCAL 

Un algoritmo (método de resolver un 
problema determinado) escrito en PAS- 



CAL, consta de dos zonas fundamenta- 
les: 

• La descripción de las acciones a 
realizar, coincidente con las sentencias 
del programa. 

* La descripción de los datos a utili- 
zar, que son las declaraciones y las de- 
finiciones de parámetros. 

A su vez, un programa en PASCAL 
está dividido en tres bloques indepen- 
dientes: 

— Cabecera. 

— Declaraciones y definiciones, 

— El cuerpo de sentencias 

La cabecera sirve para identificar al 
programa. Consta de la palabra reserva- 
da PROGRAM, seguida por un identifi- 
cador válido PASCAL. Este último coin- 
cidirá con el nombre genérico que se le 
adjudique al programa. 

A continuación, y encerrados entre 
paréntesis, figurarán Jos nombres de los 
ficheros o dispositivos lógicos a través 
de los que el programa se comunicará 
con el exterior. Estos ficheros son pro- 
pios de cada sistema. Generalmente se 
llama INPUT al fichero de entrada (te- 
clado) y OUTPUT al fichero de salida 
(impresora o pantalla). 

La zona de declaraciones y definicio- 
nes es opcional y comprende las si- 
guientes partes que, en el caso de que 
existan todas ellas, deben seguir el or- 
den riguroso en el que se relacionan a 
continuación: 

1 , Declaraciones de etiquetas. 

2, Definición de constantes. 

3, Definición de tipos. 

4, Declaración de variables, 

5, Declaración de procedimientos y 
funciones. 

Cada una de estas cinco partes se de- 
finirá más tarde con todo detalle. 
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Un programa en lenguaje PASCAL consta de tres bloques principales, 
que aparecen dentro def mismo en un riguroso orden. 





El cuerpo de sentencias incluye a las 
sentencias ejecutables del programa; 
sentencias que quedarán encerradas 
por las palabras reservadas BEGIN y 
END. Tras el END aparecerá un punto fi- 
nal ineludible. 



Los datos del PASCAL 

Los datos son la materia prima con la 
que el ordenador va a elaborar su pro- 
ducto, que no es otro que el resultado 
de la ejecución del programa. Los datos 
pueden aparecer en forma de valores 
constantes o representados por medio 
de variad fes; estos últimos pueden ver 
alterado su valor durante la ejecución 
del programa. Una semana tiene siete 
días, éste es un dato constante; mien- 
tras que el dinero de nuestro bolsillo 
suele ser un dato «bastante» variable. 

Los datos se tienen que declarar en la 
zona de declaraciones y definiciones del 
programa, para que sea factible su uso 
posterior. Para declarar una constante 
se utiliza la siguiente notación: 

CONST < identificado^ - <eonstante>; 

Análogamente, las variables se decla- 
ran con la notación que sigue: 

MR <identif¡cador1> [ <identificador2> , ,.,j: <tipo>; 

El argumento tipo se refiere a la cla- 
se de variable de que se trata y sirve 
para indicar el conjunto de valores que 
la variable puede asumir. Por lo tanto, 
la declaración de una variable define in- 
mediatamente su tipo. 

En PASCAL existen cuatro tipos nor- 
malizados de datos; enteros, reales, ca- 
racteres y booleanos. La notación «es- 
calar» se refiere a que son datos de una 
única dimensión, o lo que es lo mismo: 
que sólo definen una característica del 
elemento al que se refieren. No hay que 
olvidar que el PASCAL permite además 
a estructuración de los datos en formas 
más complejas Cada tipo de datos tie- 
ne su manera particular de expresar las 
constantes, así como sus propias opera- 
ciones y operadores definidos que per- 
miten obtener valores de un tipo deter- 
minado con operandos de ese mismo 
tipo. 




La cabecera de un programa actúa a modo de -etiqueta» que informa 
at usuario de! contenido u objeta : de¡ mismo. 




En la zona de declaraciones 
y definiciones de un 
programa PASCAL hay que 
diferenciar claramente los 
datos constantes de los 
variables. 



Datos de tipo entero 

Son los que presentan a un número 
entero, esto es: a una secuencia de dí- 
gitos decimales precedidos o no por un 
signo aritmético de suma o resta. En una 
constante entera no se admiren espa- 
cios en blanco, comas, ni puntos 

El delimitador o palabra clave que 
permite declarar datos de tipo entero es 
INTEGER. Ejemplo: 

VAR DIAS, MESES: INTEGER; 



Cuando se desee evaluar una expre- 
sión en la que los operandos son ente- 
ros, los siguientes operadores produci- 
rán un resultado de tipo entero: 

— Suma (+); a+b; suma a y b. 

— Resta (-): a-b; resta de a el valor 
de b. 

— Multiplicación {*): a*b; multiplica 
a*b. 

— División (DIV): a DIV b; divide a en- 
tre b y trunca los decimales, 

— Resto entero (MOD): a MOD b; cal- 
cula el resto entero de la división de a 
entre b. 



73 




ios identificadores sirven para asignar nombres a fas variables y r de esta forma , 
permitir su uso posterior dentro del programa 



— Multiplicación (*): a*b; multiplica 
a por b. 

— División (/): a/b; divide a entre b. 

En el caso de la división, el resultado 
será de tipo real aunque los operandos 
sean de tipo entero. 



Datos de tipo carácter 

Este tipo de datos consiste en un ca- 
rácter encerrado entre apostrofes ("). 
Por ejemplo: 'A', ’2 ‘ , '* r ... son datos de 
tipo carácter. Para representar un apos- 
trofe, éste se escribe dos veces: ( r ' "). 

Cada variable de tipo carácter tomará 
el valor de un solo carácter; su declara- 
ción en el programa se hace por medio 
de la palabra CHAR. 

Ejemplo: 



VAR LETRA: CHAR; 



Ejemplos: 

1 6 DIV 4 (el resultado es 4) 
7 DIV 3 {el resultado es 2} 

7 MGD 3 (el resultado es 1) 
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VALIDOS NO VALIDOS 



Los identificadores deben ajustarse a ciertas reglas: por ejemplo, no son utilizadles 
como identificadores fas palabras reservadas del PASCAL o las palabras que 
empiecen por una cifra numérica. 



Datos de tipo real 

El tipo real define a un elemento del 
conjunto de los números reales. Estos 
datos se representan con una parte en- 
tera y una parte fraccionaria, separadas 
por un punto decimal y precedidos o no 
por el signo correspondiente. 

Cuando se quieran representar núme- 
ros reales muy grandes o muy peque- 
ños, es conveniente utilizar la notación 
científica o exponencial. Esta incluye 
una «E*> seguida por el exponente de la 
potencia de 10 que corresponda. Por 
ejemplo, para representar el número un 
millón se utilizará; 1 .0 E6, ya que no se 
puede omitir la parte entera ni la parte 
fraccionaria. Por último, cabe señalar 
que las variables de tipo real se decla- 
ran con la palabra REAL, 

Por ejemplo: 

VAR TEMPERATURA: REAL; 

Sí se tiene una expresión en la que al 
menos uno de los operandos es de tipo 
real (el otro puede ser de tipo entero), 



los siguientes operadores obtendrán un 
valor de tipo real como resultado: 

— Suma (+); a+b; suma a con b, 

— Resta H; a-b; resta de a el valor 
de b. 



Para este tipo de datos no existen ope- 
radores específicos que permitan efec- 
tuar cálculos con ellos; no obstañte, sí 
se pueden introducir las constantes y 
las variables de tipo carácter de lectura, 
escritura y asignación. 
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En contrapartida, el PASCAL tiene de- 
finidas dos funciones estandarizadas 
que sólo son aplicables a los datos de 
tipo carácter. Estas son: 

— ORD( <car> ) que proporciona el 
número ordinal correspondiente al ca- 
rácter <car.>, y 

— CHR( <num> ) que da como re- 
sultado el carácter cuyo número ordinal 
es <num>. 

Ambas funciones suelen también de- 
nominarse de transferencia, por permi- 
tir la identificación entre cada carácter 
y su número ordinal correspondiente. 



Datos de tipo BOOLEANO 

Un dato se dice que es BOOLEANO, o 
que pertenece al álgebra de Boole r 
cuando soto puede tomar dos valores: 
abierto o cerrado, alto o bajo, cierto o 
falso, uno o cero... 

En PASCAL existen dos palabras re- 
servadas para definir a cada uno de es- 
tos valores: TRUE y FALSE {cierto o fal- 
so). 

Para entenderlo mejor, cabe pensar 
en qué situación está una ventana: pue- 
de estar abierta o cerrada, aunque no es 
admisible que esté a la vez abierta y ce- 
rrada, y tampoco puede estar de otra for- 
ma que no sea alguna de ambas. La si- 
tuación de la ventana será por tanto una 
variable booíeana. A una de las situa- 
ciones se la asigna el valor TRUE y a la 
otra FALSE. 

Para declarar un dato de tipo BOO- 
LEA1MO se utiliza la palabra B 00 LEAN, 

Por ejemplo: 

m CUENTO: B OOLEAN; 

Entre operandos de tipo booleano se 
pueden aplicar los siguientes operado- 
res que proporcionan un valor de tipo 
booleano: 

— NOT obtiene el valor opuesto al 
del resto del dato booleano sobre el que 
se aplica. Realiza la operación lógica 
«negación». 

— AND efectúa e! producto lógico; el 
resultado será FALSE, si al menos uno 
de los operandos tiene ei valor FALSE. 

— OR representa la operación de 
suma lógica; en ella, el resultado será 




'It V* 

"C,q£& 

CARACTER 




Las constantes y las variables PASCAL pueden encuadrarse en tres categorías o 
«tipos de datos»: numéricos (enteros o reales), carácter y booieanos. 




■ 



El operador MOD obtiene ei resto de una 
división entre dos números enteros. 
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Los operadores lógicos NOT, AND y OR manejen venables de tipo booleano; éstas 
sólo pueden adoptar dos valores; TRUE (cierto) o FALSE ( falso l 



TRUE si af menos uno de los operandos 
tiene el valor TRUE, 

Existen además una serie de operado- 
res que se denominan relaciónales, que 
obtienen un valor booleano aunque los 
operandos no sean de tipo booleano; 

= : indica la igualdad entre dos expre- 
siones 

O: operador de desigualdad 
<: relación «menor que» 

>: relación «mayor que» 

<=: relación «menor o igual que» 

>=: relación «mayor o igual que» 

Ejemplos de expresiones booleanas 
pueden ser: 

A<> B' 

N>=0 

A AND (NOT B) 



La sentencia de asignación 

Una vez vistos los fundamentos bási- 
cos del PASCAL, y estudiado el concep- 
to de variable y su declaración de tipo, 
hay que analizar la forma en la que pue- 



den utilizarse las variables dentro del 
contexto del programa. 

Cada variable se puede imaginar 
como una hoja en blanco de un block de 
notas, en la que se puede ir «anotando» 
con lápiz un valor constante; éste coin- 
cidirá con el valor actual que contiene 
dicha variable. Posteriormente, es posi- 
ble «borrar» el contenido de esa hoja del 
block y volver a anotar otro valor, con lo 
que se habrá actualizado eJ contenido 
de la variable en cuestión. 

Estas dos acciones tan sencillas, pero 
a la vez tan importantes, de asignar un 
valor a una variable y actualizar ese va- 
lor cuando sea necesario, están enco- 
mendadas en el PASCAL a la llamada 
sentencia de asignación, cuya forma ge- 
neral es la siguiente: 

<variable>: -<éxpresión> 

El operador de asignación es el signo 
constituido por dos caracteres. 
Este asigna el valor situado a su dere- 
cha, a la variable que Je precede. La 
zona <expresión> puede ser una cons- 
tante, una variable previamente decla- 



rada y con un valor ya asignado, o bien 
una expresión matemática o lógica; en 
este último caso, se trataría de una 
agrupación de constantes y variables 
unidas por operadores. 

La variable será el nombre de un iden- 
tificador válido PASCAL; por supuesto, 
declarado como variable en la zona de 
definiciones y declaraciones del progra- 
ma. 

La sentencia de asignación lleva im- 
plícitas dos funciones. La primera es la 
de obtener un valor al evaluar la expre- 
sión situada detrás del operador y 
la segunda la de asignar ese valor a la 
variable que precede al operador de 
asignación. 

Así, por ejemplo, 

CONTADOR := CONTADOR + 1 
ESTAVARIABLE := OTRAVARIABLE 

En el primer caso, el valor de la va- 
riable CONTADOR es incrementado en 
una unidad y el nuevo valor se asigna a 
Ja propia variable CONTADOR, «borran- 
do» así su valor precedente. 

Otro cometido importante de la sen- 
tencia de asignación es el de comprobar 
el tipo de variable. Como ya se indicó, 
cada variable sólo puede ser de un úni- 
co tipo y, por lo tanto, sólo será acepta- 
da la asignación de una expresión que 
produzca un valor del mismo tipo que el 
declarado para la variable. 

Hay excepciones a esta regla, puesto 
que algunos tipos de datos «engloban» 
a otros. De ahí que, por ejemplo, sea po- 
sible asignar un valor entero a una va- 
riable declarada como rea!. En tal caso, 
será válida dicha sentencia de asigna- 
ción. 

El dialecto de PASCAL más estanda- 
rizado no admite la asignación múltiple, 
o fo que es lo mismo: asignar un mismo 
valor a una serie de variables. Por ejem- 
plo: 

<variable>, <variable2>, ... :-<expre- 
sión> 

No obstante, algunos compiladores 
específicos sí permiten tal posibilidad. 



Expresiones aritméticas 

El objetivo fundamental de una expre- 
sión aritmética es el cálculo de un valor 
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Una sentencia de asignación evalúa la expresión incluida en su argumento 
y otorga ei valor resultante a la variable implicada. 



presión matemática puede variar según 
el orden en el que se ejecuten las ope- 
raciones indicadas en la misma. Por 
ejemplo, en la expresión: 

3*6 + 2 

si primero se ejecuta la operación de 
multiplicación y después la de suma, el 
valor que se obtiene es 20. Mientras que 
si primero se efectúa la operación de 
suma y después la de multiplicación, el 
resultado será 24. 

Para obviar este problema, los len- 
guajes de los ordenadores establecen 
un orden jerárquico de operadores, de 
tal forma que si no se dispone lo con- 
trario, se efectuarán unas operaciones 
antes que otras. En el PASCAL, la prio- 
ridad y orden jerárquico de los operado- 
res coincide con el siguiente: 

1: Funciones estándar 
2N0T 

3: V,DIV r MQD, AMO 
4:+,-,0R 

S: =<>,<,>,<-,>= 




El contenido de una variable 
puede ser borrado y * 
actualizado con un nuevo 
valor por medio de * 
sentencias de asignación . 



que se utilizará como dato. Este será 
procesado por e! programa cuando sea 
oportuno. Dicho cálculo se efectuará de 
acuerdo a una serie de regias que se ex- 
ponen a continuación. Las expresiones 
aritméticas se utilizarán en distintas zo- 
nas del programa; por ejemplo, en las 
sentencias de asignación vistas ante- 
riormente, en la definición de constan- 
tes, en el argumento de una función es- 
tándar, dentro de la condición impuesta 
en una sentencia de bifurcación condi- 
cional... 

Una expresión aritmética consiste en 
un conjunto de operandos, que pueden 
ser constantes, variables y/o funciones 
estándar (seno, logaritmo, raíz cuadra- 
da...), unidos por una serie de operado- 
res aritméticos o lógicos, tales como: 
«*», «OR», ... Por ejemplo, las si- 
guientes son expresiones aritméticas 
válidas: 

SU ELD 0H(SU E LD0*5]/ 1 00) 

'ÜUND (PI*R*R)+AREA 

En el segundo caso, ROUND es una 
función estándar que obtiene la parte 
entera redondeada de un número real. 



Jerarquía de los operadores 

Una vez conocidos los diferentes ope- 
radores útil izadles con cada tipo de da- 
tos, veamos cómo hay que manejar es- 
tos operadores de forma eficiente. 

El valor obtenido al evaluar una ex- 



Cuando en una expresión aparecen 
varios operadores con un mismo grado 
de prioridad, se ejecutará el primero de 
los que se encuentren situados más a la 
izquierda. 

Esta jerarquía puede ser modificada 
mediante el uso de paréntesis. Las ex- 
presiones encerradas entre paréntesis 
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NOT 



*J, DIVi 

MODjAND 



OR 



PASCAL 

PRIORIDAD DE LOS OPERADORES 



<>i>= 



se evaluarán prioritariamente a todas 
las demás. En el caso de que existan va- 
rios paréntesis «anidados», unos dentro 
de otros, se evaluarán primero los más 
interiores. Por ejemplo, la expresión si- 
guiente: 

í(8*2/4HW5-ÜRDrA'j) 

da como resultado el valor 7. 



Ficheros de entrada y salida 

La cabecera de un programa PASCAL 
sirve para dar nombre ai programa por 
medio de un identificados Este nombre, 
que sigue a la palabra clave PROGRAM, 
no tiene un significado especial dentro 
del contexto del programa; aunque cabe 
precisar que algunos sistemas particu- 
lares pueden asignar a dicho nombre un 
significado propio fuera del programa 
para referirse a él específicamente, por 
ejemplo en orden a su almacenamiento 
en memorias de masa. 

En todo caso, la cabecera del progra- 
ma tiene otra misión encomendada: de- 
clarar una lista de parámetros dei pro- 
grama, La lista de parámetros hace re- 
ferencia a variables que normalmente 
serán nombres de ficheros, los cuales 
deben estar en correspondencia con 
elementos que ya estén definidos e im- 
plantados de alguna forma en el siste- 
ma, con independencia del programa. 

Cada ordenador tiene definido un con- 
junto de caracteres (letras, números y 
signos especiales), que resultan «inteli- 



Ef PASCAL establece un orden de 
prioridad entre los operadores : que sólo 
puede ser alterado por la presencia de 
paréntesis. 



gibles» para el propio ordenador y para 
los dispositivos de entrada y salida. 

Sobre este conjunto de caracteres, el 
PASCAL tiene definidas dos variables de 
tipo fichero: INPUT y OUTPUT. Este tipo 
de variable se declara con la palabra 
clave FÍLE. A pesar de que se estudiará 
con más detalle posteriormente, convie- 
ne adelantar que se trata de un conjun- 
to estructurado de datos en el que todos 
eilos son del mismo tipo. 

El PASCAL tiene ya definido un tipo 
de variable que se declara con la pala- 
bra reservada TEXT y que no es más que 
un fichero de caracteres (FILE OF 
CFIAR), Los ficheros estándar INPUT y 
OUTPUT son de este tipo, de forma que, 
para el programa PASCAL, es como si 



Breve reseña histórica 

Resulta fácil deducir que el nombre de PASCAL, 
otorgado a este lenguaje, procede del insigne 
matemático, físico, filósofo y escritor francés Blas 
Pascal, quien ya en 1641, a sus escasos 13 años 
inventó una máquina de calcular. 

Los orígenes del PASCAL como lenguaje de 
programación se deben a un grupo de trabajo dirigido 
por Micklaus Wirtli. 

Partiendo de las versiones 68 y W del ALGOL, trataron 
de obtener un lenguaje de alto nivel, muy sistematizado 
y pedagógico, adscrito a las tendencias de la 
programación estructurada. 

En 1 970 se presentó el primer diseño de compilador. 
Posteriormente el PASCAL se fue afianzando hasta 
llegar a estandarizarse en 1973, Actualmente, forma 
parte, por derecho propio, de los lenguajes habituales 
en el mundo del software. 



previamente se hubiera realizado la si- 
guiente declaración: 

VAR INPUT, OUTPUT: TEXT; 

En consecuencia, a! escribir un pro- 
grama no será necesario volver a decla- 
rar estas variables, sino únicamente 
mencionarlas en la lista de parámetros 
de la cabecera. 

INPUT y OUTPUT, como parámetros 
formales del programa, representan a 
los dispositivos de entra da/sal ida de un 
sistema informático: el teclado, la im- 
presora o la unidad de discos. Gracias a 
ellos se facilita ía comunicación entre 
un programa PASCAL y el sistema bajo 
cuyo control se esté ejecutando el pro- 
grama. 

Como los ficheros INPUT y OUTPUT 
son utilizados muy a menudo por la ma- 
yoría de íos programas, se consideran 
como parámetros implícitos en ciertas 
funciones y procedimientos estandariza- 
dos cuando no se especifica lo contra- 
río. Por lo tanto, serán inicíalizados au- 
tomáticamente y con antelación a la eje- 
cución del programa, al ser declarados 
en la cabecera del mismo. 

Si en un programa se va a hacer re- 
ferencia a otros ficheros externos —ya 
existentes antes de ta ejecución del pro- 
grama, o que van a ser creados durante 
la ejecución—, los nombres de estos fi- 
cheros deben aparecer en la lista de pa- 
rámetros del programa; además, deben 
ser declarados en la zona de definicio- 
nes y declaraciones como variables de 
tipo fichero. Por ejemplo: 

PROGRAM EJEMPLO (INPUT, OUTPUT, X,ARCHIV0); VAR 
X,ARCHIV0: FILE OF<íipo>; 

siendo <típo> el tipo de las variables 
que constituyen ese fichero. 

Lectura de datos 

Un programa sin intercambio de infor- 
mación con el exterior tendrá poca uti- 
lidad al realizar siempre la misma fun- 
ción. En cambio, al poder recibir infor- 
mación del exterior ve aumentada su 
flexibilidad: proporcionará resultados de 
salida diferentes cada vez, en función de 
los datos que reciba. Suponiendo, por 
ejemplo, que ya se tienen declaradas 
con anterioridad las variables tensión, 
resistencia y corriente, como reales, las 
siguientes sentencias de asignación cai- 



78 





desde cualquier otro fichero externo, 
que previamente se haya especificado 
en Sa lista de parámetros de la cabecera 
como fuente de los datos de entrada. 

Para aumentar la utilidad del ejemplo 
anterior, pueden sustituirse las dos pri- 
meras sentencias de asignación por la 
siguiente instrucción READ: 

READ(resistencia, corriente); 

Con lo que el programa leerá los da- 
tos de resistencia y corriente y obtendrá 
un resultado dependiente de los datos 
leídos. En el soporte de entrada, los da- 
tos deben aparecer separados por espa- 
cios en blanco o por delimítadores de fin 
de línea; ello difiere, normalmente, para 
cada compilador PASCAL específico y 
dependerá del tipo de entrada de datos, 
esto es: si tiene lugar a través del tecla- 
do o por medio de cualquier otro dispo- 




La capacidad para interactuar con el mundo exterior es uno de los factores 
determinantes de ¡a versatilidad de un ordenador : ya que permite la elaboración de 
distintos, datos y fa consecución de diversos resultados 
a partir de un mismo programa. 



cularán un valor para la variable tensión 
aplicando la ley de Ohm: 

resistencia: = 100; 
corriente: - 3; 

tensión: “ resistencia ‘corriente; 

No obstante, para calcular ahora la 
tensión si la corriente vale por ejemplo 
2, será preciso modificar el programa, 
incluyendo una nueva sentencia de 
asignación: corriente: = 2; en lugar de la 
ya existente, lo que resta efectividad al 
programa. Para resolver esta situación, 
hay que utilizar una o más sentencias 
de entrada de datos, que en PASCAL se 
codifican mediante el comando READ. 
Esta sentencia lee un dato del fichero 
de entrada, especificado en el argumen- 
to de la propia sentencia de lectura, y lo 
asigna a la variable del programa que 
se incluye a continuación, en !a misma 
sentencia READ. 

Si no se especifica la fuente de los da- 
tos, se asume como tal al fichero están- 
dar INPUT. En consecuencia, cuando se 
utiliza este fichero, no es necesario in- 
dicarlo expresamente en la sentencia 
READ. El formato genérico de la senten- 
cia es el siguiente: 

READ(<fichero>, <var> <var>. 

El campo <fÍchero> es opcional y 
coincide con el nombre de la fuente de 
datos de entrada de la que se van a leer 



los valores. A su vez, <var> son las va- 
riables que recibirán la asignación de 
los datos leídos. 

Así pues, se puede leer un solo dato 
del fichero estándar INPUT, aunque 
también se pueden leer varios datos de 
ese mismo fichero y asignarlos al grupo 
de variables, separadas por comas que 
figuren en la sentencia READ; o bien, es 
posible, asimismo, extraer uno o varios 
datos para asignarlos a las variables 



sítivo como, por ejemplo, un fichero de 
entrada residente en cinta o en disco 
magnético. 

Al utilizar la sentencia READ, los da- 
tos a leer estarán dispuestos en líneas; 
de tal forma que cuando se hayan leído 
todos los datos de una línea, se saltará 
automáticamente a la línea siguiente. 
La lectura de los mismos se realizará 
siempre de izquierda a derecha. 

Si se quiere forzar el salto a una nue- 
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I La sentencia READLN permite una iectura selectiva de los datos de entrada, saltando 
automáticamente a ia línea siguiente tras leer el dato ordenado. 



va línea de entrada, se puede utilizar la 
sentencia: 

R E A D L N[<f ich ero> r <var.> r . . .); 

Tal como se observa, su formato es 
análogo ai de fa sentencia READ con- 
vencional, con la única diferencia de 
que ahora, después de leer las variables 



especificadas, se salta a la siguiente lí- 
nea de entrada, aunque aún no se ha- 
yan terminado de leer todos los datos de 
esa línea. Los datos que sigan al último 
leído serán ignorados, y la próxima sen- 
tencia de lectura leerá el primer dato de 
la línea siguiente Así, por ejemplo, si 
los datos de entrada están distribuidos 
en dos líneas de la siguiente forma: 



100 25 
2 50 

la ejecución de las sentencias que si- 
guen asignará el valor 100 a resisten- 
cia y saltará a la siguiente línea, igno- 
rando el dato 25, para asignar el valor 
2 a la variable corriente: 

READ LN f resiste nc i a 
ñÉADLN(corriertte); 



Salida de datos 

El resultado de un programa no suele 
resultar útil si no es comunicado al ex- 
terior a través de algún dispositivo de 
salida asociado al ordenador. La misión 
de una instrucción de salida es la de 
presentar cualquier expresión o valor de 
una variable en la pantalla o en cual- 
quier otro dispositivo de salida como, 
por ejemplo, la impresora. En PASCAL, 
la sentencia especializada en este co- 
metido es WRITE, cuyo formato coincn 
de con: 

WRITE(¡<f¡chem>,Kexp>[,exp> r ..J: 

El campo <fichero> define ai fichero 




Para conocer el 
; resultado del proceso 
, realizado por el 
, ordenador es 
imprescindible utilizar 
sentencias de salida 
de datos. Estas 
proyectarán los datos 
hacia los periféricos de 
salida. 
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WRITELN (TENSION ) j 
WRITELN (RESISTENCIA; 
WRITELN ; 

WRITELN (CORRIENTE); 




TENSION = 200 
RESISTENCIA - 110 

CORRIENTE = 1,818 



Cuando la salida de datos se ordena a través de una sentencia WRITELN, se 
producirá un salto automático a la siguiente línea de presentación 
tras visualizar el dato o mensaje. 



de salida de los datos, y su presencia es 
opcional; si bien, en el caso de incluir- 
se, resultará imprescindible haberlo 
mencionado en ía lista de parámetros de 
la cabecera, tal y como ocurría con Ea 
sentencia READ. La zona <exp> con- 
tiene a las expresiones matemáticas o r 
simplemente, a las variables cuyo valor 
se desea representar. En este caso, 
cuando no se especifique el fichero de 
destino de los datos de salida, se asu- 
mirá como ta! al fichero estándar OUT- 
PUT. Continuando con ei ejemplo ini- 
cial, para que sea posible conocer cuál 
ha sido el resultado de la ejecución, ha- 
brá que añadir una sentencia de salida. 
El programa completo adoptará el si- 
guiente aspecto: 

PROGRAM LEYDEOHM (INPUT, ÜUTPUT); 

VAR tensión, resistencia, corriente: REAL; 

BEGIN 

READfresistencia, corriente); 

te nsi ón : =res i stencia*ccmente; 

WITE(tensión) 

END. 

Como en el caso de READ, en una 
sentencia WRITE se pueden incluir va- 
rios elementos para ser presentados; 
éstos deben aparecer separados por co- 



mas, Sí los referidos elementos o pará- 
metros son expresiones matemáticas, 
se evaluarán previamente, y el valor 
©berrido será presentado a través del 
dispositivo de salida que corresponda. 
La sentencia WRITE del ejemplo se po- 
dría haber escrito como: 

WR ITEfresistenci a *corri ente ); 

De esta forma, se evaluaría el produc- 
to antes de mostrar su valor resultante. 
Tal y como aparece, el programa ejem- 
plo resulta bastante frío. Si la entrada 
se realiza a través del teclado, puede 
realizarse su presentación externa orde- 
nando al programa que indique con un 



mensaje qué tipo de entrada es la que 
espera recibir. Para ello se puede utili- 
zar la sentencia. 

WRITE ('introducir resistencia y co- 
rriente'), precediendo a la instrucción 
READ, con lo que el literal del parénte- 
sis se reproducirá tal cual en la panta- 
lla. 

Cada expresión de la sentencia WRI- 
TE puede, opcionalmente, adoptar Ea 
forma: 

<exp>:<Cl>:<C2> 

La zona <C1> es un número natural 
que indica ei número de caracteres con 
que debe ser escrita la expresión 





TABLA DE COMANDOS PASCAL 


* 


Instrucción 


Cometido 


Observaciones 


PROGRAM <¡d>(<par.>); 


Asignación de parámetros de acceso a un programa 


Cabecera del programa 


BEGIN <¡ns.H<ms>,...lEND; 


Delimita bloques de instrucciones ejecutables 


Cuerpo del programa 


CONST <¡d.>=<valor>; [<¡d>=<valor>;]( ... ] 


Definición de constantes 


Parte de las declaraciones y definiciones 


VAR <id.H<¡d >....]: <t¡po>; I ... ] 


Declaración de variables y su tipo 


Parte de las declaraciones y definiciones 


INTEGER 


Declaración del tipo entero 


Zona de declaraciones y definiciones 


REAL 


Declaración del tipo real 


Zona de declaraciones y definiciones. 


CHAR 


Declaración del tipo carácter 


Zona de declaraciones y definiciones 


BOOLEAN 


Declaración del tipo booleano 


Zona de declaraciones y definiciones 


INPUT 


Declarar fichero estándar de entrada 


Cabecera del programa 


OUTPUT 


Declarar fichero estándar de salida 


Cabecera del programa 


TEXT 


Declaración de tipo fichero de caracteres 


Declaraciones y definiciones 


READ) {<f ich.>} <var> ); 


Lectura de datos de un fichero 


Bloque de sentencias 


READLN(}<f¡ch>}<var.>{,...})¡ 


Lectura de datos y cambio de línea 


Bloque de sentencias 


WRITE ( (<f ¡ch>} <exp.> } ); 


Escritura de expresiones 


Bloque de sentencias 


WRITELN ( {<fich.>} <exp.> {,...}); 


Escritura de expresiones y cambio de línea 


Bloque de sentencias 


<id.>: identificador válido PASCAL <par,>: lista de parámetros de los ficheros que utilizará el programa. <ins.>: instrucción ejecutable. <va!or>: valor numérico o literal constante. 
<lipo>: uno de los tipos de datos normalizados o previamente definidos en PASCAL. <fich.>; fichero declarado con anterioridad. <var>: variable ya declarada. <exp.>: expresión válida, 
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<exp,>. En el caso de que <exp.> ne- 
cesite menos caracteres, se completará 
la expresión con espacios en blanco por 
la derecha. <C2> es otro número natu- 
ral que revela el número de dígitos de 
que constará la parte fraccionaria de 
<exp.> en el caso de que ésta sea de 
tipo REAL. Así r por ejemplo, las siguien- 
tes líneas: 



READ(tensión, resistencia); 
co r ríante : =tensió n/ resistencia; 

WR II E( 'corriente J corriente : 7 :3 ) ; 



producirán la siguiente salida: 



corriente- 1,818 



desde luego, suponiendo que el valor de 
la tensión es 200 y el de la resistencia 
110. 

Como se observa, la sentencia WRITE 
presenta los datos en una única línea. 
Si se desea presentarlos en varias lí- 
neas será preciso utilizar una sentencia 
WR1TELN. Esta comparte el mismo for- 
mato que WRITE, si bien, después de es- 
cribir las expresiones que se le indi- 
quen, provocará un salto a la siguiente 
línea de salida: 



WRITELNrtensicn= J ,tensrón:4); 

W R ITE L Nf'res i ste ncia= r r resistenci a:4); 

WRITELN; 

WR ITE( í cornente= J r corr le nte:7:3J; 

El bloque de sentencias anterior pro- 
ducirá el siguiente resultado en la pan- 
talla: 



tensión- 200 
resistencia^ 110 

corriente= 1,818 



En efecto, se observa que la senten- 
cia WRITELN sin parámetros genera 
como resultado la escritura de una lí- 
nea en blanco. 



Aspecto general de un 
programa 



PR0GRAM RAICES 2 (INPUT,0UTPUT); (‘CABECERA*) 

CGNST DGS=2; (‘DECLARACIONES Y DEFINICIONES*) 
VAR A,B,CMIZ1,RAIZ2,IMAG,PREAL DISCRLREAU 

BEGIN (‘CUERPO PRINCIPAL*) 

READ (A,B,C) 

IF A=0 THEN WRITE ( J ERROR') 

ELSE 

BEGIN 

DISCRI:=SGR(B}-4*A*C; 

IF DISCRKG THE 
BEGIN 

DISCR1 :=-DISCR I; 

I M AG:=SQRT( D I SCRI)/( D OS * A); 
PREAL:=-B/(D0S*A)¡ 

WRITELNfRAIZI = r ,PREAL/+J J r IMAG); 
WRITELN [ r RAIZ2=\ PREAL/-J'J IVIAG) 
END 
ELSE 
BEGIN 

RÁIZ1 :=(-B^3QRT( DI SCRI)]/( DOS* A); 
RAIZ 2:=( -8 -S QRT(D ISC R l))/(D0 S * A); 
WR ÍTE LN(' RAIZ 1 - ,RAIZ1 ); 

WRITE LN( J RAIZ2-,RAIZ2) 

END 

END 

END. 



Un programa escrito en lenguaje PASCAL se puede 
dividir en tres zonas fundamentales: 

• La cabecera que da nombre el programa y le asigna 
una lista de parámetros. Estos coinciden con los 
nombres genéricos de los ficheros que se utilizan en el 
programa para el intercambio de información con el 
usuario (entrada y salida de datos). 

• Declaraciones y definiciones. Zona en la que se 
reseñarán todas las etiquetas, constantes, tipos, 
variables, procedimientos y fundones a utilizar en el 
resto del programa. 

• El cuerpo del programa que, oomo su nombre indica, 
constituye el conjunto de instrucciones ejecutables que 
realizarán la función asignada al programa. 

En el ejemplo se observa la puesta en práctica del 
referido formato libre; en efecto, la indentación 
contribuye a mejorar la presentación del programa. 

£1 formato libre implica además la presencia de un 
separador de instrucciones, coincidente con el signo 
punto y coma (;). Puede conducir a confusión el hecho 
de que el ejemplo incluya sentencias que no acaban en 
punto y coma. 

Ello es correcto y se debe a que alguna de ellas 
conforman una única instrucción, como se verá más 
adelante; en consecuencia, sería un error fraccionarlas 
con algún punto y coma, 
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PASCAL (2) 



Estructuras y 
sentencias de control. 
Procedimientos 



a programación 
estructurada apor- 
ta un conjunto de 
técnicas que per- 
miten una fácil 
depuración y puesta a punto de los pro- 
gramas. Estos resultan inteligibles para 
otras personas distintas del programa- 
dor y susceptibles de recibir posteriores 
modificaciones, 

Al igual que ocurre con todos los len- 
guajes de programación, un programa 
en PASCAL se puede codificar por me- 
dio de una sucesión de sentencias que 
se van ejecutando ordenadamente, una 
tras otra, siguiendo las directrices de lo 
que se llama flujo de! programa. La con- 
tinuidad del flujo del programa está ga- 
rantizada en el PASCAL por su carácter 
de lenguaje estructurado. Ello hace que 
sea posible preservar la secuencia de 
ejecución y, por lo tanto, que no se dis- 
traiga la atención intentando compren- 
der la lógica de! programa siguiendo los 
saltos incondicionales de una a otra par- 
te del mismo. 



Estructura secuencial 



2 i 




f 


SENTENCIA 




SENTENCIA 



BEGIN / END 




■ Una sentencia compuesta , delimitada por tas palabras clave BEGIN y END , puede 
englobar múltiples sentencias elementales. A pesar de ello, la máquina trata a las 
sentencias compuestas como si se tratara de sentencias únicas . 



tructura que nos encontramos es la se- 
cuencia/. En el PASCAL, una estructura 
secuencial está formada por sentencias 
de acción, que no desvían el flujo del 
programa; tal es el caso de las senten- 
cias de asignación, de entrada y salida 
de datos... 

El programa en su conjunto se puede 
considerar como una sentencia única, al 
estar englobado el cuerpo del programa 
entre las palabras reservadas BEGIN y 
END, 



se consideran como una sola. Esta es 
una estructura muy utilizada, como se 
verá más adelante. 

Algunas estructuras de control nece- 
sitan llevar asociada una única senten- 
cia y, sin embargo, la propia lógica del 
programa exige ía presencia de varias 
de ellas para que sea posible programar 
la tarea implicada; en tal caso, al incluir 
a todas las semencias necesarias en un 
único bloque BEGfN/END, la estructura 
de control «creerá» que sólo tiene una 



Recordando los conceptos de la pro- 
gramación estructurada, la primera es- 



El bloque BEGIN/END conforma una 
sentencia compuesta, de manera que 
las sentencias encerradas en su interior 



sentencia asociada. 

El uso de sentencias compuestas den- 
tro de un programa debe limitarse ex- 
clusivamente a los casos er es que sea 
plenamente necesar o Aunque el abu- 
so de ellas no produzca n ~g^n tipo de 
error, es evidente que su D'esencia in- 
necesaria puede conducir a confusio- 
nes, como en el sigu eme ejemplo: 

BEGIN 

BEGIN 

READLS tel or: 

END; 

BEGIN 

i 1 1 - “=_\ 5 jr¡c= .dato 1 t<jato2); 

m '¿S3=,dato1-dato2); 

EftO 

END. 

Es necesario resaltar de nuevo la obli- 
gatoriedad del punto y coma «;» al final 
te teca sentencia, dada su función de 
separador No obstante, en casos como 
e :e ejemplo anterior, puede ser omi- 
: : ; si a continuación va la palabra END, 
-ay que recordar que END tiene tam- 



5 En PASCAL el punto y coma se utiliza como separador de sentencias , 
mientras que el punto señala el final del programa. 
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El flujo de un programa en lenguaje PASCAL es gobernado 
¡ por las denominadas estructuras de control. Las dos 
' estructuras básicas son la « secuencia fe y 
' ía «repetitiva» o cíclica. 




bién un carácter de separador de sen- 
tencias. En todo caso, la presencia re- 
dundante del punto y coma delante del 
END no conduce a error alguno. 

El punto final «.», localizado detrás del 
último END, es el que señala ei final del 
programa; si en su lugar apareciera un 
«;», el ordenador aguardaría a una nue- 
va instrucción, dado que el punto y coma 
denota únicamente el punto de separa- 
ción entre dos sentencias. 



Estructuras repetitivas 

En condiciones normales, las senten- 
cias se van ejecutando ordenadamente, 
y una sola vez cada una de ellas, hasta 
llegar al final del programa. Sin embar- 
go, en muchas ocasiones es necesario 
que algunas sentencias se ejecuten re- 
petidamente un determinado número de 
veces, constituyendo lo que se denomí- 










na un «bucle». Este tipo de sentencias, 
denominadas iterativas o repetitivas, se 
ejecutan bajo el control de una condi- 
ción impuesta, cuyo cumplimiento o no 
determina su repetición. 

El PASCAL cuenta con tres senten- 
cias iterativas: WHILE/DO, RE- 
PEAT/UNTIL y FOR/TO/DO, La prime- 
ra de ellas tiene el siguiente formato: 

WHILE <expresión> DO <sentencia>; 

La <expresión>, de tipo booleano, es 
la que determina el número de veces 
que se repetirá la <sentencía>; concre- 
tamente, ésta se ejecutará siempre que 
la <expresion> sea cierta (valor lógico 
TRUE). Hay que prever que la variable 
de control de la <expresión> modifique 
su valor de forma apropiada dentro del 
bucle; en caso contrario, se podría caer 
en un bucle infinito, sin final, error muy 
difícil de detectar éste. 

Para comprender mejor el funciona- 
miento de una estructura repetitiva, 
veamos el siguiente ejemplo: 

BE6IN 

READ(n) 

c=l;prod=1; 




La* sentencia WHILE/DO da pie a una estructura reiterativa. En ella se repite una 
acción determinada mientras se cumpla la condición impuesta. 
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WHILE cOn DO 
BEGIN 

prod=prod # c¡ 

c=c+1 

END; 

WRITErproducto=' H prod) 

END. 



Suponiendo previamente declaradas 
las variables que intervienen, este seg- 
mento de programa escribirá el produc- 
to de los «n» primeros números natura- 
les o, lo que es lo mismo, el llamado 
factorial de «n*_ Después de obtener el 
dato *n» y de inicialízar los valores de 
y «prod», se comprueba si es cierta 
ÍTRUE) ¡a expresión: c<=n. Si es así, se 
ejecutará la sentencia que sigue al DO. 
En este caso se trata de una sentencia 
compuesta que engloba a otras dos ele- 
mentales; técnica ésta muy utilizada 
como ya se comentó para «engañar» al 
DO y poder repetir la ejecución de va- 
rias sentencias agrupadas. Una vez eje- 
cutada esta sentencia se vuelve a com- 
probar la condición; si es cierta, se vol- 
verá a ejecutar dicha sentencia, Y así 
sucesivamente hasta que la expresión 
produzca el valor FALSE, con Jo que no 
se ejecutará la sentencia asociada al 
DO, sino la siguiente; en este caso, el 
.VRITE que escribe el resultado. 

Hay que hacer notar que el bucle no 
se ejecutará ninguna vez si la expresión 
produce el valor lógico FALSE al eva- 
uaria por vez primera. 

IMo ocurre así con la estructura RE- 
D EAT/UNTIL En ella, sea cual fuere el 
valor de la expresión en Ja primera pa- 
sada, se ejecutará primero la sentencia, 
para pasar después a evaluar la condi- 
: ón. Esto significa que siempre se eje- 
:utará al menos una vez ia sentencia in- 
terior al bucle. 

El formato de la sentencia que da 
cuerpo a una estructura de este tipo es 
a siguiente: 

- E PE AKsentenc i a> UNTIL <expresión>; 



La zona <sentencia>se repetirá (RE- 
^EAT} un número indeterminado de ve- 
les, hasta que (UNTIL) la <expresión> 
sea cierta (TRUE). En ese momento se 
seguirá ejecutando la próxima senten- 
: a del programa, ajena al bucle. 

El mismo programa capaz de calcular 
v producto de los «n» primeros núme- 




. La sentencia o grupo de sentencias encerrada entre las palabras REPEAT y i\ _ 
} se ejecutará repetidamente hasta que se verifique cierta condición. 




:A TO 8 DO) J 



La sentencia FOR/TO/DO repite una sentencia o grupo de sentencias 
lí el número de veces que se indique en su cabecera 



ros naturales, se podría codificar con la 
sentencia REPEAT/UNTIL de la siguien- 
te forma; 

BEGIN 

READ(n); 

procM; c=1; 

REPEAT 

prod=prod*c, 

C“C+1 

UNTIL c>n; 

WRITE('product(F < ,prod) 

END. 



En este caso varía la condición 
pecto a la del ejemplo que utiliza i Em- 
ienda WHIIE/DO, debido, precsa-e- 
te, a la diferencia entre ambas er.: 
turas en cuanto a ejecutar una .ez a 
menos las sentencias del bucle C e 
las divergencias entre ambas 
ras reside en que ahora no es neceser z 
introducir en un bloque BEGI\ ESI = 
todas las sentencias que const:_ e 
bucle, ya que éstas quedan del ™ aiaE 
por las palabras REPEAT y UNT _ 
Queda por ver aún una tercera -e e ‘ 



tura repetitiva, la plasmada por la sen- 
tencia FOR/TO/DO, Su principal dife- 
rencia con las dos anteriores reside en 
la funcionalidad de la condición. En Jas 
estructuras WHILE/DO y REPEAT/UN- 
TIL, el bucíe o conjunto de sentencias 
se ejecuta reiteradamente hasta que se 
verifique ía condición impuesta, instan- 
te en el que se abandonará el bucle. Sin 
embargo, en el caso de FOR/TO/DO, se 
repetirá el bucle tantas veces como va- 
lores intermedios haya entre los valores 
inicial y final de la variable de control 
del bucle. El formato es el siguiente: 

FOR <variable úb co n irol>; =<va r i a ble o valor inicial> 

10 Cvariable o valor final >D0<sentertcia>; 

En esta sentencia, tanto la variable de 
control como sus valores inicial y final, 
deben ser del mismo tipo y, específica- 
mente, de un tipo ordinal: INTEGER, 
CHAR, o cualquier otro tipo ordinal de- 
clarado por el usuario, como los enume- 
rativos y los subrango, que se verán más 
adelante. La variable de control no pue- 
de ser nunca del tipo REAL. 

El valor de esta variable de control no 
debe ser alterado por las sentencias del 
bucle. Los valores inicial y final pueden 
ser incluso expresiones del mismo tipo 
que la variable de control; expresiones 
que serán evaluadas antes de entrar en 




El andamiento de sentencias de 

1 control permite crear estructuras de 
mayor complejidad , 

el bucle. El funcionamiento de la estruc- 
tura FOR/TO/DO es el siguiente. En 
principio, se asigna a la variable de con- 
trol el valor inicial y se chequea si ya se 
ha llegado al valor final, en cuyo caso 
no se ejecutaría el bucle ninguna vez. 
Si no alcanza aún el valor final, se eje- 
cutará el bucle y, seguidamente, se in- 
crementará el valor de la variable de 
control antes de ser comprobado de 
nuevo. Este proceso se repite hasta que 
la variable de control adopta el valor fi- 
nal, pasando entonces a ejecutar la pró- 
xima sentencia del programa. 

El ejemplo que sigue dibujará un his- 
tograma, o diagrama de barras, con tan- 
tos asteriscos por barra como indique el 
valor de «número», introducido a través 
del teclado: 

PROGRAM asteriscos flNPUT r OUTPUT); 

VAR contadocnúmero, barra, num barras: INTEGER; 

BEGIN 



R E A D L N(n u mba rras); 

FOR barra:=1 TO num barras DO 
BEGIN 

READLN(número); 

FOR barrai=1 TO numero DO 
WRÍTEn 
WRITELN 
END 
END. 



Como quiera que el bucle más inter- 
no está formado por una única senten- 
cia, no es necesario incluirla en un blo- 
que BEGIN/END; no obstante, sí ha, 
que hacerlo con el bucle más externo 
que consta de más de una sentencia. 

La variable de control asociada a esta 
sentencia puede evolucionar con valo- 
res ascendentes o descendentes. Para 
hacer que «cuente hacia atrás», sólo ha v 
que sustituir la palabra TO por DOWN- 
TO: 

PROGRAM asteriscos (INPUTOUTPUT); 

VAR contador, numero, barra, rumbarras: INTEGER; 

BEGIN 

WRITELN('Cuantas barras?'); 

READLN(numbarras); 

FOR barra;=numbarras DOWNTO I DO 
BEGIN 

READLN(numero); 

FOR contador:=numero DOWNTO 1 DO 
WRITEH; 

WRITELN 

END 

END. 



Sentencias anidadas 



Para tener un control completo de 
flujo del programa, se utilizan las sen- 
tencias de repetición y las sentencias de 
selección que más adelante serán obje- 
to de estudio. Todas ellas incluyen otras 
sentencias de control gobernadas por la 
que las contiene. De esta forma se pue- 
den crear estructuras de cualquier nivel 
de complejidad, «anidando» unas sen- 
tencias en otras. El tratamiento que se 
hace de las sentencias compuestas, por 
parte del usuario, coincide con el de tai 
sentencias simples. Esta característica 
otorga al PASCAL una gran legibilidad 
facilitando la comprensión de los pro- 
gramas de un simple vistazo. 



WRITELN ('Cuantas barras?'); 




. En la actualidad existen compiladores de PASCAL para 
todos los ordenadores más populares. 
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La modularidad de! PASCAL permite estructurar los programas de forma limpia y 
ciara i facilitando su inteligibilidad y, por ende su mantenimiento, 



cuyo caso deben ir agrupadas dentro ie 
bloques BEGIN/END. 

La zona ELSE puede ser omít ca er 
tal situación, se pasará a ejecutar c hi- 
tamente la sentencia posterior a Is ane- 
ciada a Ja zona THEM cuando no se 
rifíque la condición impuesta. 

Al tropezar con una sentencia ce esta 
categoría, es fácil imaginar cuá sera a 
actuación del ordenador. Si la core zdr 
es cierta, pasará a ejecutar la ser:e~: 3 
correspondiente a la zona THE\ ga- 
rando la asociada a la parte ELSE ¡Mr 
el contrario, si la condición es F-^SE 
emprenderá la acción inversa. As x r 
ejemplo, en el siguiente segmente re 
programa: 

IF cierto 

THEM WRITELNfVERDADERO'J 
. ELSE WRITELN( 'FALSO'); 

«cierto» será una variable declaraos ih- 
viamente como de tipo booleanc a_.o 
valor actual será visualizado en la 



La sentencia IF/THEN/ELSE 

Para concluir con el estudio de las es- 
tructuras fundamentales de la progra- 
mación estructurada, hay que examinar 
las denominadas estructuras selectivas 
o condicionales. Su especialidad es la 
de romper el fíujo del programa en un 
determinado punto del mismo, depen- 
diendo de si se cumple o no una condi- 
ción establecida. El valor lógico de la 
condición se comprueba durante el de- 
sarrollo del programa. Si es cierto {va- 
lor lógico TRUE) se ejecutará una sen- 
tencia específica, mientras que si se ob- 
tiene el valor lógico falso fFALSE), será 
otra la sentencia a ejecutar a continua- 
ción. La estructura selectiva está fiel- 
mente reflejada en la sentencia de con- 
trol IF/THEN/ELSE. Esta adopta en el 
PASCAL un formato más elegante y cla- 
ro que en otros lenguajes, como es el 
caso del FORTRAN o el BASIC. En efec- 
to, ahora no es necesario utilizar núme- 
ros de línea a ios que dirigir la ejecu- 
ción del programa, sino que es posible 
introducir hasta programas completos 
como alternativa a cada una de las de- 
cisiones derivadas de la condición im- 
puesta, Su formato general es: 




Las sentencias selectivas ayudan al ordenador a tomar complejas decisiores 



IF <expr.> THEM <sent> [ ELSE <sent> ]; 

En ella, <expr.> equivale a una ex- 
presión de tipo booleano, cuyo resulta- 
do puede adoptar los valores TRUE o 
FALSE. A su vez, <sent> corresponde 
a sentencias simples o compuestas, en 



talla. Una precisión relativa a esta se- 
ténela, es que no hay que co tia' 
punto y coma «;» delante de la i= 
ELSE, aun en ef caso de que caca zcra 
de la sentencia IF se escribe e~ ~ees 
separadas. 

Las sentencias IF pueden se' e-ci- 




das», o más propiamente dicho, encade- 
nadas una tras otra. Desde luego, al po- 
ner en práctica esta posibilidad habrá 
que tener cuidado para no perder de vis- 
ta qué zonas THEN y ELSE correspon- 
den a cada sentencia IR En el siguiente 
ejemplo, la zona ELSE corresponde a la 
segunda sentencia IF, por ser la más 
cercana; aunque, obviamente, esta 
construcción puede resultar ambigua en 
ciertos casos: 

IF cont>1 0 THEN IF suma^O 
THEN bal i=TRUE ELSE 
bal :=FALSE; 

Para eliminar tai ambigüedad, se pue- 
de proceder de dos maneras. Una posi- 
bilidad es utilizar la indentación, admi- 
tida por el formato libre; ello supone ali- 
near en la misma columna las zonas 
THEN y ELSE correspondientes a una 
misma sentencia IF La segunda alter- 
nativa es englobarlas dentro de bloques 
BEGIN/END de la siguiente forma: 

IF cont>10 THEN 8EGIN IF suma-0 
THEN bal :=TRUE ELSE 
bal :=FÁL$E END; 




La sentencia IF permite elegir entre 
dos opciones en función deí 
cumplimiento o no de cierta 
condición impuesta. 

Cabe también la posibilidad de utili- 
zar ¡a siguiente formulación: 

IF com>10 THEN BEGIN IF suma=0 
THEN bal :=TRUE END ELSE 
bal :=FALSE; 

si lo que se desea es que la zona ELSE, 
corresponda a la primera sentencia IF. 
Desde luego, con este método queda 
más claro a qué sentencias pertenece 
cada ELSE. 

La aplicación más frecuente de la 
sentencia IF/THEN/ELSE es la de se- 
leccionar una entre varias opciones. 
Veamos cómo se realiza en el siguiente 
ejemplo: 

IF numero>9999 THEN 
cifras:=5 

ELSE IF numero >999 THEN 
cifras:=4 

ELSE IF numero>99 THEN 
cifras:=3 



vino : = 5 



CASE vino OF: 




■ 



La estructura CASE/OF brinda la posibilidad de programar tomas de decisión en 
las que hay que optar por una entre más de dos alternativas . 
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ELSEIF numerad THEN 
cifras:=2 
ELSE cifras:=1; 

Esta construcción permite ejecutar la 
primera sentencia IF cuya condición sea 
cierta, abandonándose tras ello toda la 
estructura selectiva, de tal forma que 
sólo se ejecutará una de las sentencias 
de asignación incluidas en la misma. 



Muestrario para elegir 

La sentencia IF sólo permite elegir 
una entre dos opciones: ejecutar la zona 
THEN o ejecutar fa zona ELSE, Sin em- 
bargo, en muchos casos interesa poder 
elegir una entre varias opciones (más de 
dos). Para que ello sea posible utilizan- 
do sólo sentencias IF, sera preciso cons- 
truir estructuras artificiales, similares a 
la del último ejemplo. 

Sin lugar a dudas ésta es una posibi- 
lidad de gran eficacia; pero queda aún 
otra sentencia de control, de tipo selec- 
tivo o de bifurcación condicional, que re- 
solverá el problema con una mayor ele- 
gancia, Se trata de la sentencia CA- 
SE/OF, cuyo formato es el que se indi- 
ca a continuación: 

CASE <expr > OF <et >:<sent>; 

<et.>:<$ent>;...END; 

Esta incluye una expresión, <expr.>, 
de tipo ordinal {1NTEGER,CHAR h .,.), que 
seleccionará una única sentencia, sim- 
ple o compuesta, de todas las emplaza- 
das a continuación de la palabra OF y 
hasta la palabra END, que pone punto fi- 
nal a la sentencia CASE. 

Cada una de las sentencias que for- 
man el muestrario de opciones alterna- 
tivas, debe ir precedida por una constan- 
te del mismo tipo que el de la expresión 
que actúa como selector. Estas constan- 
tes son denominadas «etiquetas CASE» 
(una de las pocas cosas que no hay de 



Las etiquetas declaradas por medio 
de [ABEL indican a ia sentencia 
GOTO hada qué punto del programa 
debe dirigir el flujo de ejecución r 



? 






■ La sentencia GOTO ordena una bifurcación de tipo mcondidonai 
rompiendo fa secuenda normal de ejecudón del programa. 




89 





GOTO 







EL USO DE GOTO PUEDE 
SER PERJUDICIAL PARA 
SU PROGRAMA 




El uso de GOTO resulta 
desaconsejable en PASCAL puesto 
que rompe la estructura lógica del 
programa. 



declarar directamente en un programa 
PASCAL) 

La estructura CASE seleccionará, en 
definitiva, aquella sentencia cuya eti- 
queta coincida con el valor actual que 
tome la expresión selectora, ignorando 
a las restantes. Una vez ejecutada la 
sentencia elegida, el flujo del programa 
abandonará la estructura CASE/OF. 

Como es habitual, una etiqueta pue- 
de preceder a todo un conjunto de sen- 
tencias englobadas dentro de un bloque 
BEGIN/END. Si no existe una etiqueta 
coincidente con el valor obtenido por la 
expresión selectora, el efecto de la sen- 
tencia CASE es indefinido, produciendo 
normalmente un mensaje de error en la 
pantalla. Por ejemplo: 

READLN(dia); 

CASE dia OF 

1 : nombre;- LUNES'; 

2:ncmbre:-MARTES J ; 

3: nombre:- MIERCOLES'; 

4:nombre:= J JUEVES J ; 

5:nombre:- VIERNES'; 

6:nombre:-SABADO J ; 

7:nombre:-DQMINGO'; 



END; 

WR IT ELN{ nombre); 

Como se ha indicado, si en el ejemplo 
anterior el valor de «día» fuese menor 
que 1 o mayor que 7, el resultado Seria 
indefinido Para evitar este tipo de erro- 
res es conveniente limitar de alguna for- 
ma los valores que pueda tomar la ex- 
presión selectora. Ello puede lograrse 
de dos formas. La primera es incluir la 
sentencia CASE en una de las zonas de 
una sentencia IF: 

IF dia>0 AND dia<8 THEM 
CASE día OF... 

ELSE WRITÉLN( CODIGO ER ROMEO'); 

De esta forma, si «dia» toma un valor 
no comprendido entre 1 y 7, ambos in- 
cluidos, se imprimirá eí mensaje que ín- 
dica el error. 

La segunda alternativa es declarar la 
variable selectora como de tipo subran- 
go, con lo cual sólo podrá tomar deter- 
minados valores: 

VA R dia: 1,7; 
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Bifurcación incondicional 




Los modernos lenguajes de programación — tal es el caso de PASCAL— 
tienden a ser estructurados y modulares. Ello facilita la confección 
y el mantenimiento de los programas. 



Para finalizar con las sentencias de 
control del PASCAL, queda por ver la de 
salto incondicional GOTO. Por medio de 
esta sentencia se puede dirigir el flujo 
del programa a cualquier punto del mis- 
mo, anterior o posterior a la posición 
que ocupe GOTO. Su formato general es 
muy simple; consta únicamente de la 
palabra clave GOTO, seguida por una 
etiqueta. Esta etiqueta, que será un nú- 
mero entero sin signo y, generalmente, 
de no más de cuatro cifras, se corres- 
ponderá con el valor que se sitúe inme- 
diatamente delante de la sentencia a la 
que se desea transferir la ejecución del 
programa. 

Cada etiqueta que vaya a ser utilizada 
con una sentencia GOTO, debe ser de- 
clarada previamente en la zona de de- 
claraciones y definiciones del programa, 
mediante la palabra clave LABEL; ésta 
precederá a cualquier declaración 
CONST o VAR. 



PROGRAM ejemplogoto {OUTPÜT); 

LABEL 100,200, 

VAR n:IWTEGER; 

BEGIN 

n :=1 ; 

100:IF n>10THEN GOTO 200; 

WRITELN(n); 
n :=n+1; 

GOTO 100, 

2Q0:EMD. 

En el programa ejemplo se producirán 
bifurcaciones a las sentencias «etique- 
tadas» con los números 1 00 y 200 en di- 
versos momentos de la ejecución. 

El uso de sentencias GOTO rompe la 
estructuración del programa y, en con- 
secuencia, dificulta su seguimiento y 
suele ser causa de múltiples errores. De 
ahí que su presencia sea desaconseja- 
ble en muchos casos; aunque hay veces 
que resulta imprescindible recurrir a 
ella, ya que su eliminación podría com- 
plicar el programa en exceso. En todo 
caso, una máxima fundamental de la 
programación estructurada aboga por- 
que todas las sentencias GOTO pueden 
ser eliminadas de un programa. 

«La presencia de GOTO indica que el 



programador no ha aprendido a pensar 
en PASCAL» (Jensen & Wirth). 



Qué es un «procedimiento» 

A la hora de confeccionar un progra- 
ma, se presenta con frecuencia la nece- 
sidad de utilizar repetidamente, y en dis- 
tintos puntos del mismo, un cierto blo- 
que de instrucciones; instrucciones que 
realizan una tarea específica, coinciden- 
te en los distintos casos. Ello obliga a 
escribir el mismo conjunto de senten- 
cias, tantas veces como sea necesaria 
su presencia a lo largo del programa. 
Este bloque de sentencias suele recibir 
el nombre de subprograma. En PASCAL 
es posible escribir cualquier subprogra- 
ma una sola vez, y activarlo mediante 
una simple llamada al mismo cuando 
sea necesaria su ejecución. 

Un programa es un edificio de com- 
pleja realización. Por ello, es importan- 
te que esté bien estructurado y sea fácil 
de leer; y no sólo por el traductor de len- 
guaje, sino también por el usuario o el 
programador En base a ello, los moder- 
nos lenguajes de programación —tal es 
el caso del PASCAL — , tienden a ser es- 
tructurados y modulares. Sin lugar a du- 
das, el mantenimiento o modificación de 
un programa, será más sencillo si éste 
está dividido en pequeñas porciones 
(módulos) independientes. 

En PASCAL, un subprograma se de- 
nomina PROCEDURE (procedimiento). 



El conjunto de sentencias que *o cons- 
tituyen se crean por medio de la -decla- 
ración del procedimiento- . En e la se 
asocia un identificador al procedimien- 
to, por medio del cual será activado en 
el instante apropiado. 

La declaración de un p recae miento 
adopta la misma estructura que jn pro- 
grama PASCAL; razón por ía que se pue- 
de considerar a un programa como un 
verdadero «superproced i m iento- PAS- 
CAL, En consecuencia, e procedimien- 
to constará de una serie ce parámetros 
de entrada/salida op: n~e es, de una 
zona de declaración ce .anadies, tam- 
bién opcional, y fina merte de un cuer- 
po de sentencias englobado dentro de 
un bloque BEGIN E\D La declaración 
de un proced rr er:o debe ser posterior 
a la propia declarac cr ce variables, por 
medio de VÁP ce. programa principa!. 



Procedimientos sin parámetros 

Como ya se mencionó, los parámetros 
de entrada se da de un procedimiento 
son opcionales. es posible definir proce- 
dimientos s r larámetros y también pro- 
cedí miemos cor parámetros. 

Los procedimientos sin parámetros 
tienen como finalidad realizar una de- 
terminada acción en la que no se pro- 
ducirá mngün resultado aprovechable 
por otra zona del programa; a su vez, el 
p r o;ec miento sin parámetros tampoco 
necesitará ningún dato elaborado por el 
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PROCEDURE SUBRAYAR; 





















Un procedimiento sin 
parámetros no 
produce resultados de 
salida , ni exige el 
suministro de datos de 
entrada. 




PARAMETRO 
DE ENTRADA. 



PROCEDURE 

UCUADORA 




\v PARAMETRO 
DE SALIDA 



■ Los procedimientos con parámetros pueden manipular datos externos a los 
mismos , así como crear y entregar datos a otras zonas del programa. 



resto del programa. El siguiente ejem- 
plo ilustra la declaración de un procedi- 
miento sin parámetros Más adelante se 
analizarán con más detalle cada una de 
sus zonas constitutivas, así como su co- 
metido. 

PROCEDURE subrayar; 

VAR n:INTEGER; 

BEGIN 

FOR n TO final DO 
WRITE 
WRITELN 
END; 



La estructura de la declaración es, tal 
y como se adelantó, totalmente similar 
a la de un programa. Tan sólo varía su 
cabecera; en lugar de utilizar la palabra 
clave PROGRAM, se emplea ahora la 
palabra PROCEDURE. 

La palabra que identifica a este pro- 
cedimiento es «subrayar», y debe ser un 
identificador válido en PASCAL. Su co- 
metido será activar el procedimiento en 
el punto adecuado del programa, ade- 
más de dar una idea del objetivo del pro- 
cedimiento; esto último siempre que el 
nombre utilizado resulte sugerente. El 



procedimiento del ejemplo tiene como 
misión visualizar en el dispositivo de sa- 
lida (la pantalla), una línea de guiones, 
que actuará como subrayado de la línea 
que se haya imprimido con anterioridad 

La zona de declaraciones de un pro- 
cedimiento es totalmente análoga a la 
de un programa. De nuevo, su misión es 
la de declarar las variables que vayan a 
ser utilizadas únicamente dentro del 
procedimiento. En el caso de la variable 
«final», su valor le será asignado fuera 
del procedimiento y, por lo tanto, no es 
necesaria su declaración dentro del 
mismo, aunque sí está permitido el re- 
ferirse a ella. La variable «n» se dice que 
es una variable local, que sólo podrá ser 
referida dentro de ese procedimiento, 
mientras que la variable «final» es una 
variable global, que puede ser utilizada 
en cualquier zona del programa. Por lo 
tanto, hay que tener en cuenta que un 
mismo identificador, declarado como va- 
riable global a nivel de programa y a la 
vez como variable local en un procedi- 
miento, no representará a ía misma va- 
riable, recibiendo valores diferentes en 
cada zona del programa. 

Finalmente, el cuerpo de sentencias 
encerrado entre las palabras BEGIN y 
END incluirá el conjunto de sentencias 
ejecutables que se encargarán de reali- 
zar la misión encomendada al procedi- 
miento. En principio, puede parecer un 
contrasentido el hecho de incluir sen- 
tencias ejecutables en la zona de decla- 
raciones del programa; ello se puede in- 
terpretar como una indicación de la ac- 
ción a realizar al ser activado el proce- 
dimiento. 

Para activar un procedimiento sin pa- 
rámetros basta tan sólo con escribir la 
palabra o identificador que se colocó de- 
trás de la palabra PROCEDURE. El si- 
guiente programa utiliza el procedi- 
miento creado en el ejemplo anterior: 

PRGGRAM cabecera ( LN PUT, OUTPUT); 

VAR pag,final:INTEGER; 

PROCEDURE subrayar; 

VAR nINTEGER; 

BEGIN 

FOR n:=1 TO final Do 

WRITEM; 

WRITELN 

END; 

BEGIN 

WRIIELN( r HASTA QUE COLUMNA!; 

READLMffinal); 
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TABLA DE COMANDOS-PASCAL 


Comando 


Cometido 


Observaciones 


WHILE <expr> DO <sent >; 


Ejecución de un bucle mientras es cierta Ja expresión 


Cuerpo del programa 


REPEAT <sent.> ;<$ent.>; ... UNTIL <expr.>; 


Ejecución de un bucle hasta que sea cierta la expresión 


Cuerpo del programa 


FOR <cont.>:-<ini.> TO <fin> DO <sent,>; 


Ejecución de un bucle según los valores ascendentes de 
una variable 


Cuerpo del programa 


FÜR <cont> ; =<i n i >D 0 W NT 0<f i n . >D0<se ni >; 


Ejecución de un bucle según Jos valores descendentes de 
una variable 


Cuerpo del programa 


BEGIN <$ent> ;<sent>; ... END; 


Agrupación de varias sentencias en una úrica compuesta 


Cuerpo del programa 


IF <expr> THEN <sent.> {ELSE <sent>}; 


Ejecución condicional de una entre dos opciones 


Cuerpo del programa 


CASE <sel> OF <et.>:<sent>;...END, 


Ejecución condicional de una entre dos o más opciones 


Cuerpo deJ programa 


GOTO <etiqueta>; 


Bifurcación incondicional 


Cuerpo del programa 


LABEL <etiqueta>; 


Declaración de etiquetas 


Zona de definiciones y declaraciones 


PROCEDURE <id>; <declaraciones>; 
<bloque de sentencias>; 


Declaración de un subprograma o procedimiento sin pa- 
rámetros 


Zona de declaraciones y definiciones. 


PROCEDURE <¡d>; (<lista>); 
<declaraciones>; <bloque de sentencias>; 


Declaración de un subprograma o procedimiento con pa- 
rámetros 


Zona de declaraciones y definiciones 


<¡d>{. <id >, ...}: <tipo>; 


Parámetros formales de entrada 


Cabecera de la declaración de procedi- 
mientos con parámetros 


VAR <¡d.>{,<id>, ...}: <tipo>; 


Parámetros formales de entrada/salida 


Cabecera de la declaración de procedi- 
mientos con parámetros 


NOTA: <expr>: expresión de tipo booleano. <sent,>: sentencia ejecutable. <cont.>: variable de control del bucle. <ínj>: expresión que da el valor inicial a la variable de control. 
<fin.>: expresión que indica el valor final de Ea variable de control. <$el>; expresión de tipo ordinal <et>: etiqueta; será una constante del mismo tipo que el selector. <eíiqueta>: 
entero de no más de cuatro cifras y sin signo. <id.>: identificador válido PASCAL. <tipo>: tipo de datos. <fista>: lista de parámetros formales de entrada y/o salida de un procedimiento. 



WRITELNj 'SUBRAYADO HASTA LA 
COLÜMIMA:;final) 
subrayar 
END. 

La sentencia cíe llamada que activa al 
procedimiento es su identificador «sub- 
rayar», tal y como se observa en el ejem- 
plo. Ello desencadena la ejecución de 
las acciones indicadas en el bloque de 
sentencias. Si la ejecución desea repe- 
tirse en cualquier otra zona del progra- 
ma, bastará con hacer una nueva llama- 
da al procedimiento en cuestión utili- 
zando su identificador: «subrayar». 



Procedimientos con parámetros 

Cuando se desee que un determinado 
subprograma pueda manejar datos crea- 
dos en otra zona del programa, o inclu- 



so crear sus propios datos para utilizar- 
los en el resto del programa, habrá que 
recurrir a los denominados procedi- 
mientos con parámetros. El término «pa- 
rámetros» se refiere a esos datos que 
manipula el procedimiento y que tienen 
una procedencia o destino exterior al 
procedimiento. En consecuencia, los pa- 
rámetros pueden ser de entrada, de sa- 
lida o de entrada y salida a la vez. Estos 
parámetros se indicarán encerrados en- 
tre paréntesis, detrás del identificador 
del procedimiento; algo semejante a lo 
que se hace en fa cabecera del progra- 
ma. Esta es la única diferencia sustan- 
cial respecto a ios procedimientos sin 
parámetros. La forma más general de un 
procedimiento con parámetros es la si- 
guiente: 

PROCEDURE <identiflcador> (<param> f;<param>;..,j); 
<zona de declaraciones^ 

<bloque de sentencias>. 



Los parámetros reflejados en la cabe- 
cera del procedimiento se llaman pará- 
metros formales, debido a que en el mo- 
mento de declarar el procedimiento no 
tienen asignado ningún valor concreto. 
El valor se asignará al hacer la llamada 
al procedimiento, tal y como analizare- 
mos más adelante. Los parámetros for- 
males de entrada deJ procedimiento 
adoptarán la forma siguiente: 

<identificactor>:<tipo>; 

En este caso, al ser tan sólo un pará- 
metro de entrada, su valor no estará dis- 
ponible fuera del procedimiento; esto 
es: no podrá coincidir con un resultado 
del mismo. En cambio, los parámetros 
formales de entrada y salida, adoptarán 
un nuevo aspecto: 

VAR <identiíicador>:<tipo>; 

Ahora, se obtendrá en este parámetro 
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Los parámetros actuales de la sentencia de llamada transfieren ios datos a los 
parámetros formales def procedimiento. 




Un procedimiento puede activar a otro distinto y éste , a su vez a un tercero; y así 
sucesivamente, creando estructuras más complejas. 



un resultado del procedimiento que 
puede ser utilizado en cualquier otra 
zona del programa. Un ejemplo contri- 
buirá a clarificar las cosas: 

PRGGRAM operaciones (INPUT r OUTPUT}; 

VAR A.B^uma^roductoiREAL; 

PR0CEDURE sumar (numl r num2:REAL; 

VAR res uls urna: REAL); 

BEGIN 

re$ulsuma:=num1+num2 

END; 

PROCEDURE multiplicar (num3,num4: 

RE AL; VAR resul producto: REAL); 

BEGIN 

resu I prod ucto:- nu m3* n u m4 
END; 



BEGIN (*del programa principan 
READLN(A,B|; 
sumar|A,B,suma); 
multiplicar|A,B, prod ucto); 

WRITELNfSUMA^suma); 

WRITE LN( J PRO D U CT Q- rod u cto) 

END (* del programa *]. 

En el programa intervienen dos pro- 
cedimientos con parámetros, denomina- 
dos «sumar» y «multiplicar». En ellos, los 
parámetros formales son: «numl», 
«num2», «num3» y «num4» (sólo de en- 
trada) y «resulsuma» y «resulproducto» 
(de salida). 

La llamada a los procedimientos con 
parámetros se realiza en la forma habi- 



tual, por medio de su identificador; si 
bien, en este caso, hay que añadir tras 
él una lista de parámetros encerrada 
entre paréntesis. 

Estos parámetros, incluidos en la sen- 
tencia de llamada, se denominan pará- 
metros actuales , por ser los que van a 
asignar valores a los parámetros forma- 
les del procedimiento. En el ejemplo, al 
parámetro formal «numl» se le asigna- 
rá el valor del parámetro actual «A» en 
el momento de la llamada; y análoga- 
mente para los restantes parámetros de 
entrada al procedimiento. El procedi- 
miento operará dichos valores para pro- 
ducir un resultado que se asignará al 
correspondiente parámetro de salida; su 
valor estará disponible en el parámetro 
actual de salida de la sentencia de lla- 
mada («suma» o «producto»), una vez 
concluida la ejecución de! procedimien- 
to, Cada parámetro actual micializa a su 
correspondiente parámetro formal; por 
ello, es necesario que éstos se corres- 
pondan en número, orden y tipo, en la 
sentencia de llamada y en la declara- 
ción de! procedimiento. 

Suponga que al ejecutar el programa 
se introducen para «A» y «B» los valores 
3 y 5, respectivamente. En el momento 
de llamar al procedimiento «sumar», el 
valor «A» se transfiere a «numl» y el de 
«B» a «num2». El procedimiento asigna- 
rá entonces el valor 8 a «resulsuma», y 
al devolver el control a la sentencia de 
llamada, este valor será transferido a 
«suma», con lo que este resultado esta- 
rá disponible en dicho parámetro formal 
es también de salida, su parámetro ac- 
tual para imprimirlo en la pantalla o en 
el periférico de salida. 

Si un parámetro formal es sólo de en- 
trada, e! correspondiente parámetro ac- 
tual puede ser una constante, una ex- 
presión, una variable, o incluso el iden- 
tificador de llamada a otro procedimien- 
to. No obstante, si el parámetro formal 
es también de salida, su parámetro ac- 
tual debe ser obligatoriamente una va- 
riabfe. Por ejemplo: 

sumar(3 r 5+B J suma); 
multiplicaras, 9); 

Así la llamada anterior al procedi- 
miento «sumar» del programa «operacio- 
nes», es correcta, pero no lo es la lla- 
mada a «multiplicar», puesto qüe el pa- 
rámetro actual de salida es una cons- 
tante (9) en lugar de ser una variable. 
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PASCAL (3) 



Funciones y tipos de 
datos no 
estructurados 



a medularidad de 
que gozan los pro- 
gramas codifica- 
dos en lenguaje 
PASCAL, no se li- 
mita única y exclusivamente a los pro- 
cedimientos. Hay otros medios que per- 
miten independizar a una determinada 
zona del programa y englobarla en ío 
que se denomina un «subprograma». 
Este subprograma, encargado de reali- 
zar una función específica, podrá utili- 
zarse con total comodidad en cualquier 
otro punto del programa; y sin que por 
ello haya que escribir de nuevo el mis- 
mo conjunto de sentencias cada vez que 
se desee su intervención. 

Para que un bloque de sentencias ad- 
quiera la condición de subprograma, no 
es indispensable que su ejecución deba 
repetirse en diversos puntos del progra- 
ma. Aunque su ejecución deba realizar- 
se tan sólo una vez, es recomendable 
segmentar cuidadosamente el programa 
en subprogramas que refuercen su es- 
tructura modular. Con ello, el programa 
resultará más inteligible para cualquier 
persona que lo lea y, a su vez, será más 
fácil y rápida su depuración y modifica- 
ción. 

Habitualmente es preciso manipular 
una determinada información, transfor- 
mándola según un criterio específico. 
Suponga, por ejemplo, que se tiene 
como información de partida los datos 
BASE y ALTURA {dimensión de la base 
y altura) de un triángulo. Esta informa- 
ción puede ser manipulada en orden a 
obtener como resultado el área del 
triángulo en cuestión. El pequeño sub- 
programa al que se encomiende la fun- 
ción de hallar e! área del triángulo, sólo 
tendrá que tomar los datos de entrada 
(BASE y ALTURA), obtener su producto, 
tras ello dividirlo por dos y, por último, 
asignar este valor resultante a otra va- 
riable, por ejemplo: AREA. El referido 
tratamiento de los datos se podría rea- 
lizar con la ayuda de un procedimiento 
con parámetros de entrada y de salida. 



PRGCEDURE areatriángulc ( RAS E, ALTU R A: RE AL; VA R 
AREA: REAL); 

BEGIN 

ARE A:= B AS E * ALTURA/ 2 
END; 




Dentro deí repertorio del lenguaje PASCAL existen toda una serie de 
funciones ya definidas y a disposición directa del usuario. 




i 

El usuario puede completar la gama de funciones 
PASCAL creando, a voluntad, sus propias funciones; 
para ello debe utilizar la palabra clave FUNCTION. 
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PARAMETROS FUNCION RESULTADO 

DE ENTRADA 



Una función con parámetros formales de entrada obtiene un resultado 
dependiente del valor actual de los referidos parámetros. 



Existe, como ya se apuntó, otra posi- 
bilidad para confeccionar este segmen- 
to de programa. Esta no es otra que la 
de definir el referido conjunto de sen- 
tencias como una «función», capaz de 
generar un resultado. 



Las funciones del PASCAL 



Una función consiste en una serie de 
órdenes de cálculo, aplicadas sobre 




■ En el ejemplo del texto , la función AREA calcula el valor de la superficie de un 
triángulo a partir de dos parámetros de entrada: BASE y ALTURA, 



ciertos operandos de entrada, que pro- 
porcionan un resultado de salida. 

Las funciones deben ser declaradas 
en la correspondiente zona de declara- 
ciones y definiciones del programa pre- 
viamente a su uso, al igual que ocurría 
en el caso de los procedimientos. 

La declaración de las funciones se 
hace de forma similar a la declaración 
de los procedimientos; si bien, ahora es 
preciso utilizar la palabra reservada 
FUNCTIGIM (función) en la cabecera de 
la declaración. Esta irá seguida por un 
identificador válido PASCAL, que se uti- 
lizará posteriormente para llamar a la 
función, y por una lista opcional de pa- 
rámetros formales de entrada. Los pará- 
metros aparecerán, con sus nombres y 
sus tipos, encerrados entre paréntesis. 
Por último, tras la lista de parámetros 
se especificará el tipo de resultado que 
proporciona la función. 

A esta cabecera le seguirá la zona de 
declaración de variables, en el caso de 
ser necesario, y el cuerpo de la función. 
En ella es realmente donde se calcula 
el resultado a partir de los parámetros 
actuales de entrada. En definitiva, el as- 
pecto general de una función es el si- 
guiente; 

FUNCTIGN <ídentificador> [[<pará metro formal^ [„..])]; 
<tipo de resultado^ 

<zona de decía raciones^ 

<cuerpo de la función>; 
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Comúnmente suele establecerse una 
división entre las funciones, separándo- 
las en funciones sin parámetros y fun- 
ciones con parámetros. En realidad, se 
puede considerar que la lista de pará- 
metros es opcional y, por lo tanto, es fa- 
cultativo incluirla cuando se considere 
necesaria u omitir su presencia. 

Cabe precisar que una función sólo 
puede calcular un único valor como re- 
sultado, a diferencia de los procedi- 
mientos con parámetros que pueden ge- 
nerar más de un resultado de salida. 

El resultado debe ser asignado al 
identificador de la función, dentro del 
cuerpo de sentencias que la componen. 
Será esta asignación la que permitirá 
«devolver» el resultado de la función. Al 
respecto, resulta obvio que el tipo de va- 
lor calculado debe coincidir con el tipo 
del dato declarado en la cabecera como 
resultado de la función. Por lo demás, 
el resultado sólo puede ser de un tipo 
escalar (REAL, 1NTEGER, CHAR o BGO- 
LEAN); no es admisible que el resultado 
de una función sea de tipo estructurado. 

El lenguaje PASCAL cuenta con una 
serie de funciones estandarizadas, cuyo 
empleo por parte del usuario no exige 
su declaración previa. Ejemplos de fun- 
ciones estándar incorporadas al PAS- 
CAL y que ya se han mencionado en an- 
teriores capítulos de la obra son: 
SQR(X), SIN(X), ORD(X), SUCC(X), etc. 

Volviendo al ejemplo precedente (cál- 
culo del área de un triángulo), podemos 
codificarlo ahora por medio de una fun- 
ción: 

PRQGRAM AREATRIANGULQ (IMPUT, OUTPUT); 

VAR Ion g ba se, lo ng a It ura ;REAL; 

FUNCTION area (BASE, ALTURA: REAL): 

REAL; 

BEGIM 

area:=BA$E f ALTURA/2 

END; 

BEGIN(*def programa principal*) 

R E ADLN ( I on g ba se Jon ga 1 1 u ra ); 

WRITE LN( ARE A- r a reaflo ngba se, I ongaltu ra) 

END. 

Aquí se observa con total claridad 
cómo se declara una función para que 
entregue un resultado de tipo real 
(REAL). 

En el cuerpo de la función, que debe 
ir escoltado por las palabras BEG1N y 
END, se asigna el valor calculado al 
identificador «area». Tal asignación per- 



I En muchos casos e$ difícil decidir cuál es ei método idóneo para resolver un 
1 determinado problema... ¿ Procedimiento . , o función? 



- 





■ Las estructuras recursivas reflejan en el ámbito informático la image^ í 
pescadifía que se muerde la cola: ¿se están alimentando , o sirven ce ~t~: 



mitirá que la función «devuelva» el va- 
lor calculado al punto de llamada. 

La llamada o activación de una fun- 
ción PASCAL, se puede realizar de dos 
formas. La primera se concreta en una 
llamada directa, sin más que nombrar 
en el momento adecuado el identifica- 
dor de la función, seguido por la lista de 
parámetros actuales si los hubiere. Así 



es como tiene lugar en e ^ : an- 
terior: la llamada se 'ea :í de 

una sentencia de esc':_'= :_a rusen- 
tará directamente e : : :e s 'un- 
ción, En el segunde ces: = --ace se 

realiza dentro de una : a ze asig- 

nación o de comparsc ir templo: 

AREADELTRIANGUU):^ E-HO, -* 
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TYPE TERRICOLA 



TYPE MARCIANO 



I L a püstbi Ik Ijd t te l ieftt i i r dista / t os tipos de de tos ptin a u > t 1/ h ¡ i i aer 
I a éstos entre sí. La propia definición de tipo delimita, al tiempo , 

™ los posibles valores que puede adoptar cada dato. 



«Function» versus «procedure» 

Cabe pensar que cualquier segmento 
de programa codificable a modo de pro- 
cedimiento, puede codificarse análoga- 
mente mediante una función. Tal afir- 
mación es cierta, debido a la gran simi- 
litud que existe entre ambos conceptos. 
De ahí que quepa la duda de cuándo uti- 
lizar un procedimiento (PROCEDURE) y 
cuándo una función (FUNCTION). 

En la práctica existen claras diferen- 
cias entre procedimiento y función. De 
entrada, una función puede generar un 



único resultado, mientras que un proce- 
dimiento puede entregar cualquier nú- 
mero de valores de salida (uno, varios o 
ninguno). Por otro lado, los parámetros 
formales de una función sólo son de en- 
trada —aportan valores a la función—, 
mientras que los parámetros de un pro- 
cedimiento pueden ser de entrada y sa- 
lida de datos. 

Para precisar el uso de uno u otro mé- 
todo en cada caso específico, es conve- 
niente recordar la siguiente regla. 
Cuando sólo sea necesario un único re- 
sultado, teniendo o no parámetros de 
entrada, se debe utilizar una FUNCTION. 



En los demás casos, esto es, cuando no 
haya resultado o haya más de uno, se 
utilizará el PROCEDURE. Por supuesto 
que esta regla no es inquebrantable, 
pero su aplicación facilitará, sin lugar a 
dudas, un uso más eficaz de los recur- 
sos que brinda el lenguaje PASCAL. 



La recursividad del PASCAL 



La recursividad se define como la ca- 
pacidad de un subprograma para lla- 
marse a sí mismo. En efecto, dentro de 
un procedimiento o función se puede in- 
cluir una llamada a ese mismo procedi- 
miento o función. Para clarificar este 
concepto, puede examinarse la función 
siguiente, que calculará de forma recur- 
siva e! factorial de un número entero. 
(El factorial de un número se define 
como el producto de todos los enteros 
comprendidos entre 1 y dicho número, 
ambos inclusive). 

FUNCTION factorial (N:INTERGER): 

INTERGER; 

BEGIN 

1F N=1 THEN factorial:-! 

ELSE factor ia l:^f actor 1 a l| N - 1 ) # N 
END; 

En el ejemplo se observa cómo den- 
tro del cuerpo de la función «factorial» 
se efectúa una nueva llamada a la mis- 
ma función «factorial», aunque ahora 
con otro parámetro actual de entrada. 
Suponga que en un determinado progra- 
ma se realiza la siguiente llamada a 
esta función: 

MU MERO: "factor i a 1(3); 

a! intentar obtener el resultado para 
el valor actual (3) del parámetro formal 
«N», la función detectara que dicho va- 
lor es distinto de 1 (IF N=1 ...). A raíz de 
ello, se producirá una nueva llamada a 
la función ahora con el valor de entrada 
2, dejando pendiente el producto de 3 
por el resultado de la función «factorial 
(2)». La nueva llamada se encontrará 
con una situación parecida a la del caso 
anterior, operándose una nueva llama- 
da a la función factorial, esta vez con el 
parámetro actual 1. De nuevo, quedará 
pendiente el producto del 2 por el resul- 
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| Mediante la introducción de tipos de datos definidos por el usuario 
I puede evitarse el tradicional error de operar con datos 
I de distinto tipo... ¡sumar peras con manzanas! 



tado de la función «factorial (1)». La lla- 
mada «factorial (1)» cerrará este enca- 
denamiento de llamadas, devolviendo 
ahora el valor 1 al ser cierta la condi- 
ción impuesta en la sentencia IF r con lo 
que se podrán realizar todas las opera- 
ciones pendientes de las llamadas ante- 
riores. 

Dentro de una estructura recursiva 
debe figurar siempre alguna sentencia 
de ruptura; de Jo contrario se formaría 
un ciclo sin final. En él se repetiría in- 
cesantemente la llamada a la función o 
al procedimiento, hasta que se origina- 
ra un error por desbordamiento (over- 
flow) de alguna de las variables impli- 
cadas en la estructura recursiva. 



Los tipos del PASCAL 

Para que sea posible utilizar cualquier 
elemento del PASCAL, ya se trate de 
constantes, variables, funciones o ex- 
presiones, es imprescindible su declara- 
ción previa dentro del programa. Esta 
declaración previa permite asignar a 
cada elemento del PASCAL lo que de- 
nominamos un «tipo»; de forma que cada 
elemento será de un tipo determinado y 
sólo uno. El tipo de cada dato determi- 
nará el conjunto de posibles valores que 
éste puede adoptar, así como los opera- 
dores que se podrán utilizar con él. No 
hay que olvidar que cada tipo de datos 



admite un determinado conjunto de ope- 
radores que producirán resultados de 
ese mismo tipo. 

El hecho de distinguir entre tipos de 
datos facilita la tarea de programación 
y agiliza la detección de errores. Al tra- 
bajar con lenguajes que no utilizan ti- 
pos de datos, es frecuente que se pro- 
duzcan errores muy difíciles de detec- 
tar; por ejemplo, al intentar «sumar pe- 
ras con manzanas» (cantidades ambas 
que estarán expresadas en forma de nú- 
meros enteros). Al utilizar diferentes ti- 
pos de datos para las peras y las man- 
zanas, quedan eliminados los posibles 
errores de esta naturaleza. 

En el capítulo precedente se vio cómo 
la declaración de las variables con VAR 
asigna instantáneamente el tipo especi- 
ficado a dichas variables. Asimismo, 
medíante la declaración de constantes 
con COIMST, era posible que una futura 



modificación de esos valores constantes 
sólo afectara a su declaración, y no a to- 
das las sentencias en las que figurase 
esa constante. De forma similar, el PAS- 
CAL permite dar un nombre o identifi- 
cador a un tipo de dato determinado me- 
díante la llamada «definición de tipo». 
Ello contribuye a facilitar en mayor me- 
dida ef manejo de los tipos de datos. Ef 
formato de esta definición de tipo es el 
siguiente; 

TYPE <ídentificador> = <típo>; 

Toda definición de tipo debe preceder 
en el programa a la declaración de va- 
riables con VAR. Es importante reseñar 
que esta definición de tipo NO declara a 
una variable, sino únicamente a un tipo 
de dato con un nuevo nombre; nombre 
que se podrá utilizar posteriormente 
como tal en la declaración de variables 



TYPE PALOS = (OROS, COPAS, ESPADAS, BASTOS ) ; 





La definición ce datos deí 
tipo enumerado se lleva a 
efecic relacionando 
ordenadamente cada uno 
da ios s valore s a 
crear. 
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DHUD VAR FRUTA: ( PERAS J MANZANAS, FRESAS] 





FRUTA: = FRESA; 



La declaración de una variable como de tipo enumerado puede 
también realizarse mediante la palabra clave VAR 



□ de otros elementos def PASCAL. En el 
siguiente ejemplo se observa la puesta 
en práctica de una definición de esta ín- 
dole: 

TYPE 

numero-REAL; 

respuesta=BOOLEAN; 

VAR 

temperatura: numero; 
calor: respuesta; 

Estas declaraciones equivalen a las 
siguientes: 

VAfi 

temperatura:REAL; 
ca !or:BO OLEAN; 



Tipos de datos no estructurados 

Tipos de datos no estructurados, o es- 
calares estándar, son aquellos cuyos 
posibles valores no se pueden descom- 
poner en otro tipo de dato. Estos tipos 
de escalares estándar, ya estudiados en 
anteriores capítulos de la obra, son: IN- 
TEGER, REAL, CHAR y BGOLEAN, 

Los posibles valores de estos tipos de 
datos están ordenados, esto es: al eva- 



luar dos datos, siempre se puede esta- 
blecer un orden ascendente o deseen- 
dente entre ellos. En virtud de esta ca- 
racterística, quedan definidos los opera- 
dores de relación (menor que, mayor o 
igual que...|, así como la sentencia de 
asignación. Una expresión de cualquier 
tipo escalar, excepto el REAL, puede ser 
variable de control de un bucle FOR o 
selector de una sentencia CASE/OF. 

No obstante, hay muchas ocasiones 
en las que el usuario desearía poseer 
otros tipos de datos, que le permitieran 
manejar con mayor facilidad una cierta 
información. Así, por ejemplo, en deter- 
minadas ocasiones, convendría utilizar 
un tipo de datos cuyos valores fuesen 
los nombres de los días de la semana, 
o los tres colores básicos; o incluso los 
palos de una baraja de cartas española. 
El PASCAL permite la definición de nue- 
vos tipos de datos escalares por parte 
del usuario. Esta definición puede lle- 
varse a efecto según dos métodos: por 
enumeración, o por definición de un 
subconjunto de cualquier otro tipo de 
dato escalar (tipos subrango). 



El tipo enumerado 

La definición de tipo por enumeración 
se realiza especificando ordenadamen- 



te todos y cada uno de los valores del 
nuevo tipo que se quiere definir. Los va- 
lores se representarán por medio de 
identificadores; éstos constituirán las 
constantes de ese tipo de datos defini- 
do, y se declararán mediante la siguien- 
te definición; 

TYPE Cidentifícador del tipo>=«id.1>,<id.2> <id,n>); 

El ¡dentificador del tipo será el nuevo 
nombre de ese tipo de datos, mientras 
que la lista encerrada entre paréntesis 
coincidirá con los posibles valores que 
pueden adoptar los elementos que se 
declaren. Veamos un ejemplo al respec- 
to: 

TYPE F R UTAS : ( P E RAS, M A NZAN AS , FRESAS); 

VAR f:FRUTAS; 

En él, la sentencia de asignación 
«f:~FRESAS» es válida y plenamente co- 
rrecta, puesto que la variable «f» ha sido 
declarada del tipo FRUTAS, entre cuyos 
posibles valores se encuentra et de FRE- 
SAS Sin embargo, no será posible asig- 
nar a 4», o a cualquier otra variable de- 
clarada con el tipo FRUTAS, otro valor 
distinto de los nombres PERAS, MAN- 
ZANAS o FRESAS; en ese caso se pro- 
duciría un error. 

La definición de los tipos por enume- 
ración se puede efectuar también direc- 
tamente de la siguiente forma: 

VAR f :( PE RAS, MANZANAS , FR ESAS); 

Un tipo de datos definido por enume- 
ración y que ya está implementado en 
el lenguaje PASCAL, es el tipo BOO- 
LEAN Las constantes de este tipo de da- 
tos son TRUE y FALSE. Virtualmente, es 
como si el programador hubiese realiza- 
do la siguiente definición: 

TYPE B OOLEA M=(TRU E, FALSE) 

IMo obstante, y como quiera que están 
ya disponibles directamente, el progra- 
mador no se verá obligado a repetir di- 
cha definición cada vez que desee utili- 
zar el tipo BGGLEAN. 

Los identificadores empleados como 
constantes de un nuevo tipo enumera- 
tivo de datos recién definido, no pueden 
volver a utilizarse como constantes den 
la definición de otro nuevo tipo de da- 



100 





Otra forma con la que cuenta el usuario para definir tipos de datos consiste en la 
selección de un subconjunto de valores de cualquier tipo escalan 



tos. En consecuencia, no será válida la 
siguiente definición de tipos, pues el 
tipo al que pertenece el valor SAB que- 
da definido de forma ambigua, al no ser 
de un tipo único: 

TYPE 

CURRAR (LUMBAR, MIE # JUE,VIE, SAB); 

DESCANSAR: (SA8.D0M); 

Los tipos definidos por el usuario se- 
rán de uso exclusivamente interno del 
programa. Desde luego, pueden ser 
asignados o probados; si bien, no se po- 
drán utilizar en sentencias de lectura o 
escritura, es decir, no se podrán asignar 
mediante sentencias READ o READLN, 
ni esciribir sus valores con WRITE o 
WRITEIN. 



Tipos subrango 



Para definir sus propios tipos de da- 
tos, el programador cuenta con un se- 
gundo método: la definición de los lla- 
mados tipos subrango. Este nuevo tipo 
de datos, que puede ser creado a partir 
de cualquier otro tipo de dato escalar 
definido con anterioridad {excepto del 
tipo REAL), consiste en un subconjunto 
de valores de ese otro tipo, limitado por 
un valor máximo y un valor mínimo Su 
definición adopta el siguiente aspecto: 

TYPE Cidentificador tipoXcteX. 

<cte>; 

Las dos constantes que delimitan el 
rango de valores permisible deben ser 
del mismo tipo, y además deben estar 
ordenadas: limite inferior a la derecha 
del límite superior. 

Por ejemplo, si se desea utilizar una 
variable para manipular los números de 
los días del mes, ésta se puede declarar 
como de tipo 1NTEGER. Pero, si por cual- 
quier motivo se asigna a esta variable 
un valor entero inferior a «1» o superior 
a «31», obviamente se estará cometien- 
do un error de concepto que no será de- 
tectado por el programa; desde luego, a 
no ser que se codifique alguna senten- 
cia que se encargue de comprobar tal si- 



tuación. Esta sentencia no será necesa- 
ria se se define a la variable como de un 
tipo subrango de los números enteros, 
de la siguiente forma: 

TYPE DIASPELMES: 1.31; 

VAR DIA:DIASDELME$ 



Ahora, la variable DIA sólo podrá to- 
mar los valores de los números enteros 
comprendidos entre 1 y 31, ambos in- 
clusive Si se realizara una asignación 
fuera de ese rango — por ejemplo, 
DIAS:=4G — se produciría un error. 
Como ya se mencionó, este tipo de da- 
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La estructuración de tos 
datos facilita el 
tratamiento de ios 
mismos y confiere una 
mayor claridad al 
programa . 
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La estructura de tipo 
matriz está compuesta 
por un conjunto de 
elementos del mismo tipo : 




TYPE REBAÑO = ARRAY [i 1000 j OF VACAS 



Los elementos de un 
«arraya están ordenados 
de acuerdo a su relación 
unívoca con un 
determinado subconjunto 
de los números enteros. 
Esta relación es la que 
permite identificar a cada 
elemento , 



tos se puede definir a partir de cualquier 
otro tipo escalar, excepto del tipo REAL. 
Por lo tanto, serán válidas las definicio- 
nes de tipos que se realizan en el pro- 
grama adjunto (CONCIENCIA), 



Datos estructurados 

El fin primordial de la ciencia infor- 
mática es el tratamiento de la informa- 
ción. Esta información toma cuerpo en 
los datos, que serán manipulados de 
acuerdo a los algoritmos apropiados 
para resolver cada problema específico. 

En definitiva, ¡os datos forman la com- 
ponente estática del problema, mientras 
que la componente dinámica está cons- 
tituida por los algoritmos que los mane- 



jan. En algunos casos, los datos serán 
fáciles de manipular y, por lo tanto, la 
componente dinámica del programa 
será también sencilla. Aunque la mayor 
parte de las veces no será así, sino que 
resultará obligado establecer algún tipo 
de relación entre los datos, que facilite 
su manejo y que simplifique la tarea de 
programación. Esto, ni más ni menos, 
hace patente fa necesidad de estructu- 
rar los datos Se define a una «estructu- 
ra de datos», como una colección orga- 
nizada de datos, en la que éstos están 
relacionados entre sí de alguna forma. 
Tal y como ocurría con la estructuración 
del programa, la estructuración de los 
datos presenta varias ventajas que jus- 
tifican el estudio en profundidad de los 
datos a manejar en un programa. Entre 
otras contrapartidas, una estructura de 
datos bien pensada reduce enormemen- 
te la complejidad del programa que los 



va a manejar; por lo demás, aumenta la 
claridad de lectura y, en definitiva, me- 
jora su seguimiento y facilita su posible 
modificación futura. Aún cabe citar otra 
razón más que aboga por el uso de da- 
tos estructurados: se consigue un mejor 
rendimiento al ejecutar el programa, de- 
bido a la menor cantidad de memoria 
necesaria para el almacenamiento de la 
información a procesar. 

Dentro de sus virtudes como lenguaje 
de programación estructurado, el PAS- 
CAL permite la definición de cuatro ti- 
pos de datos estructurados: matrices 
(ARRAY), conjuntos (SET), registros (RE- 
CORD) y archivos (FILE), 



Matrices o arrays 

Las matrices deben su existencia en 
los lenguajes de programación a la no- 
tación matemática que permite referir- 
se a un conjunto de variables mediante 
un único vector de identificación, y se- 
leccionar en él un valor mediante el em- 
pleo de subíndices. 

Una matriz se define, pues, como un 
conjunto finito de componentes, todos 
del mismo tipo, que están ordenados en 
relación unívoca con un conjunto 
—también ordenado— de números en- 
teros. Este conjunto de enteros ordena- 
dos recibe el nombre de subíndices. 
Cada uno de ellos permitirá el acceso a 
su componente correspondiente de la 
matriz. 

Esta misma idea es extensibíe a ma- 
trices n-dimensionales, en las que cada 
componente será referenciado por más 
de un subíndice. Así, para el caso parti- 
cular de una matriz de dos dimensiones 
cuyo nombre sea *Z», se tiene: 



"zll 


z12 


zln 


z21 


z22 


z2n 


_zm1 


zm2 


zmn 



Cada componente es identificado por 
una expresión del tipo Z[i, j], en donde 
el subíndice «i» indica la fila y el subín- 
dice *j» indica la columna. En estq caso, 
fos subíndices i y j podrán adoptar ¡os 
valores enteros comprendidos entre 1 y 
m, y entre 1 y n, respectivamente; con 
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La estructura de tipo conjunto está 
integrada por una colección finita de 
objetos del mismo tipo. 
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lo que cada componente queda unívo- 
camente determinado. En PASCAL, el 
tipo de dato matriz se define con la si- 
guiente notación: 

TYPE <identificador>ARRAY [<tipo indice>]GF <tipo 
base>; 

Por ejemplo: 

TYPE tabla=ARRAY [t .,100] OF REAL; 
caractepARRAY [CHAR] 0F 
INTEGER; 

En 9a definición cabe distinguir varias 
zonas. El <identificador>, coincidente 
con el nombre del nuevo tipo de dato de- 
finido. El <tipo índíce>, que puede ser 
cualquier tipo ordinal (excepto el INTE- 
GER) previamente definido (CHAR, 
BOOLEAM, enumerado o subrango); 
éste fijará el número de elementos que 
formarán la matriz. Hay que señalar que 
en el ejemplo de la declaración del tipo 
«tabla», aunque el tipo del índice pueda 
parecer que es INTEGER, por estar for- 
mado por los números enteros del 1 al 
100, no es así r sino que se trata de un 
tipo subrango de los enteros. Finalmen- 



te, hay que hablar de Ja zona <tipo 
base>; ésta revela el tipo de todos y 
cada uno de los componentes (ya que to- 
dos son del mismo tipo), y puede ser 



cualquiera, incluso otro tipo estructura- 
do. Es importante recordar que esta de- 
finición de tipo con TYPE, no deciara va- 
riable alguna; en consecuencia, para 



AUB=C 





ABC 



El PASCAL permite 
reatizar ías operaciones 
típicas entre conjuntos; 
por ejemplo, la unión de 
conjuntos , cuyo 
resultado e$ un nuevo 
conjunto que agrupa a 
todos los elementos de 
los conjuntos afectados 
por la operación. 
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poder utilizar este tipo de dato estructu- 
rado en un programa, habrá que decla- 
rar con VAR una variable matriz de un 
tipo ARRAY previamente definido. Por 
ejemplo, si se hace la declaración: 

VAR x; tabla; 

la nueva variable x será del tipo «tabla», 
que había sido definido en el ejemplo 
anterior. Así, la variable «x» quedará 
creada como una matriz de números 
reales con 100 componentes. No obs- 
tante, la declaración de variables matriz 
se puede realizar directamente de la si- 
guiente forma: 

VAR x: ARRAY [1 .100] 0F REAL; 

No existe límite en la dimensión de 
las matrices; ello depende únicamente 



Ambito de las variables 

Para que una variable PASCAL pueda ser utilizada en el 
contexto de un programa debe ser declarada con 
anterioridad su intervención. Esta declaración puede 
realizarse en distintas zonas de un programa: en la zona 
de declaraciones del propio programa, en la zona de 
declaraciones de una función o en la de un 
procedimiento. Ello hará que el ámbito de utilización de 
esa variable se vea restringido al bloque en el que ha 
sido declarada Por ejemplo, si una variable se declara a 
nivel de programa, es decir en la zona que sigue al 
bloque PRÜGRAM, se podrá refere nejar dentro de 
cualquier subprograma incluido en él, y también fuera 
de ellos. Este tipo de variables se denominan globales. 
Por el contrario, sí una variable se declara dentro de 
una determinada función o procedimiento, ésta seré de 
tipo focal: sus valores sólo estarán disponibles dentro de 
dicho procedimiento o función y nunca en una zona del 
programa exterior ai mismo. Así, por ejemplo, una 
variable puede ser global sólo en dos o más 
subprogramas, local en alguno de ellos o global a todos 
los subprogramas. 

En el ejemplo de la figura, las variables J y K son 
globales a todo el programa cuyo nombre es «externo»; 
sus valores también estarán disponibles en el interior 
de fa función denominada «interna®. A su vez, las 
variables L y M son locales en la función «interna» y no 
serán reconocidas fuera de ella. Por el contrario, la 
variable I tendrá valores distintos fuera y dentro de la 
función «interna», ya que está declarada en ella como 
variable local y como variable global en e! programa 
«externo». 

La declaración de una variable local con el mismo 



de la capacidad de memoria del ordena- 
dor utilizado 

La declaración de matrices multidi- 
mensionales se hace de la siguiente for- 
ma: 

VAR párrafo: ARRAY [1 ...30] OF ARRAY 
[1 .20] OE CHAR; 

O más abreviadamente: 

VAR parraforARRAY [1 ..80,1 ..20] OF CHAR 

Como ya se indicó, a cada elemento 
de la matriz se accede por su nombre se- 
guido de los subíndices encerrados én- 
tre corchetes; subíndices que incluso 
pueden ser expresiones. A los elemen- 
tos de la primera declaración de párrafo 
se accederé, entonces, mediante parra- 
fo[i] [j]; mientras que a fos de la segun- 



identíficador que una global no producirá error alguno, 
si bien los valores asignados a ella en cada zona del 
programa serán distintos. En efecto, aunque compartan 
el mismo nombre, representan a variables distintas. 

Esta característica suele ser fuente de numerosos 
errores por parte de programadores poco 
experimentados: es muy fácil intentar utilizar una 
variable local fuera de su ámbito, o bien querer disponer 
del valor de una variable global en un bloque en el que 
está definida otra variable local con el mismo 
idemificador. 

Para conocer el ámbito de una variable hay que 
examinar la zona de declaraciones del bloque en el que 
esté inmersa; si no está declarada en él, habrá que 
examinar eJ bloque que contenga al anterior, y asi 
sucesivamente hasta llegar al bloque más general que 
coincidirá con el PROGRAM. Si tampoco está definida 
en él, resultará obvio que dicha variable generará un 
error de complicación ai no estar declarada en ninguna 
zona dei programa. 



PROGRAiVl externo (!NPUT,QUTPUT); 
VARlj,K :REAL; 



FUNCTION interna (...); 
VAR l,L,M :REAL; 



END; 

BEGIN 



END. 



da se hará con :parrafo[Í,j]. Así, serán 
válidas las siguientes asignaciones, su- 
poniendo declaradas las variables: «le- 
tra», «I» y «J»; 

parrafo[8,12]:=A'; 
letra -parrafoj 50, 101 
IF parrafo[l,J]- ' THEN 1;=l+1 ELSE 
letra:= r A J ; 

Para aclarar mejor los conceptos re- 
lativos al uso de matrices de datos, vea- 
mos un sencillo ejemplo: un programa 
que realizará la multiplicación de dos 
matrices bidimensionales de números 
enteros (ver cuadro adjunto). 

La operación de multiplicar matrices 
es específica de este tipo de datos, si 
bien se apoya en el producto y la suma 
de números enteros. De esta forma, ei 
elemento [i,j] de la matriz resultante, se 



PRÜGRAM ituj lí i pl i car matrices (IIMPUT, OUTPUT); 
C0NST MI -6; M2=4; M3=2 
VAR 1:1 ..MI; J: 1 . . M3; K: 1 . . M2; 
dato: INTEGER; 

A: ARRAY [1 . . M1,1 . . M2] OF INTEGER; 

R: ARRAY [1 .. . M2,1 . . M3] OF INTEGER, 

C: ARRAY [1 ,. M1.1 .. M3] 0F INTEGER; 
BEGIN 

F0R l:=1 TO MI DO 
BEGIN 

FOR K:-1 TO M2 DO 
BEGIN 

READLN(dato); 

AI LK] :=dato 
END 

WRITELN 

END; 

FOR K:-1 TO M2 DO 
BEGIN 

FOR J:~1 TO M3 DO 
BEGIN 

READLNfdato); 

B[K,J]:-dato 

END; 

WRITELN 

END, 

FOR l:=1 TO MI DO 
BEGIN 

FOR J:=1 TO M3 DO 
BEGIN 

DAT0:=O; 

FOR Ki-1 TO M2 DO 

dato:=dato+A [!,K]*B[K,J]; 
C[U]:=dato; 

WRlTE(dato) 

END; 

WRITELN 

END 

END. 
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obtiene sumando los productos ordena- 
dos de los términos de la fila i-ésima de 
la primera matriz, por los términos de la 
columna j-ésima de la segunda matriz. 
Para ello, se dimensionan como cons- 
tantes el rango de enteros que determi- 
nará el tamaño de las matrices, alma- 
cenándose éstas en las matrices Ay B. 
A su vez, el resultado se almacenará en 
la matriz C, 

Para multiplicar matrices de otras di- 
mensiones, sólo habrá que modificar tos 
valores constantes declarados con 
CONST. 



El tipo SET 

El lenguaje PASCAL permite manejar 
el concepto matemático de «conjuntos». 



característica ésta que no comparten la 
mayoría de los restantes lenguajes de 
programación. En todo caso, cabe seña- 
lar que su uso se ve reducido a casos 
muy particulares. Un conjunto se puede 
definir como: «una colección de elemen- 
tos distintos entre sí, pero del mismo 
tipo». 

Los conjuntos se representan en PAS- 
CAL escribiendo sus elementos entre 
corchetes: 

[ 1 , 3 , 7 , 9 , 21 , 34 , 11 ] 

[rojo,verde,azul] 

Las variables de conjuntos, es decir, 
aquellas que se declaren como de algún 
tipo SET, tal y como se verá más ade- 
lante, pueden contener en un momento 
dado ninguno, uno, varios o todos los 



Funciones estándar de los 
tipos ordinales 

Todos los tipos de datos analizados hasta ahora 
pertenecen a la categoría general de «tipos ordinales». 
Ello se debe a que, para cualquier valor dado, existe 
siempre un sucesor y un predecesor del mismo, salvo 
que se trate del primer o último elemento de alguno de 
estos tipos. 

El lenguaje PASCAL dispone de dos funciones estándar 
que permiten obtener los valores anterior o posterior a 
un dato: 

PRED(X) y SUCC(X); en donde X es un valor de cualquier 
tipo ordinal 

Supóngase, por ejemplo, que se ha definido el tipo 
enumerado siguiente: 

TVPE 

DlASSEMANA=tLUN,MAR,MIE, 



JU E , VI E , S A B, D 0 M ); 

La función SUCC(LUN) dará como resultado MAR, 
mientras que la función PRED(SAB) entregara el valor 
VIE. Otra fundón definida para los tipos ordinales es 
ORD(X). Su objetivo es proporcionar el número entero 
que indica el orden que ocupa el valor X dentro del 
conjunto de posibles valores de! tipo ordinal al que 
pertenece. 

Otra función estándar, sólo aplicable a datos del tipo 
CHAR, es CHR(i). Esta devuelve el carácter cuyo número 
ordinal coincide con el valor indicado por el parámetro 
de entrada I. Así, la expresión 
INiCtAL:=CHR{0RD('A J )+l-1 T asignará a la variable 
INICIAL la letra l-esima del abecedario. 

Todas estas funciones permiten proyectar los valores de 
cualquier tipo ordinal sobre un conjunto de los números 
naturales y actúan, en consecuencia, como virtuales 
funciones de transferencia. 



O o o o o o a 

r 2" 3~ 4' 5“ 6“ 7" 




B 




VAR B : SET OF INTEGER ; 



[i] |TÑ] B = TRUE 



La función ¡N comprueba ¡a relación 
de inclusión entre elementos y 
conjuntos: esto es, verifica la 
pertenencia de un elemento a un 
conjunto. 



PROGRAM CONCIENCIA (INPUT); 

TYPE 

DIAS SE M A N A^LU iCfó AÍftl IE ,JLI E,VI E, SAB,ÜQM); 
LAR 0 R AB LES-LU N .. VIE; 

CANTIDAD^. .5, 

LETRA- A'.. T; 

VAR HOY :D!ASS EMANA; 

COPAS:C ANUDAD; 

CU R R AR : LABQ RABEES; 

NUM:INTEGER; 

INICIAL: LETRA; 

BE6IN 

READLN (INICIAL), 

CASE INICIAL OF 
T:H0Y-LUN; 

'M':HÜY:=MAR; 

XHGY-MIE; 

U:HOY:=JUE; 

Y:H0Y:^IE; 

j S j :HÜYfSAB, 

D';HQY:=DQM 

END; 

CURRAR:=LUN; 

RÉPEAT BEGIN 

IF HOY=CURRAR THEN COPASE 
ELSE COPAS ™5; 

CU R BAR :-SUCC(CUR R AR ) 

END 

UNTIL CURRAR:=VIE OR HQY=CURRAR, 

WRÍTELNÍ NO BEBER MAS DE J , COPAS/ COPAS') 

END. 
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TA8LA DE COMANDOS-PASCAL 


Comando 


Cometido 


Observaciones 


FUNCTION <¡d.> {(<l¡sta>)} :<tipo>; 


Declaración como función de un conjunto de sentencias 


Zona de declaraciones y definiciones 


<¡d.1>,...:<tipo.1> ,<¡d.2>,...:<tipo. 1 >,... 


Declaración de los parámetros formales de una función 


Cabecera de una FUNCTION 


TYPE <id.> = <tipo>; {...} 


Declaración de tipos de datos no estándar 


Zona de declaraciones y definiciones previa a VAR. 


TYPE <¡d.> -(<id.1> <¡d.n>); 


Declaración de tipos por enumeración de datos 


Zona de declaraciones y definiciones previa a VAR 


TYPE <id.> = <cte>...<cte.>; 


Declaración de tipos subrango de datos 


Zona de declaraciones y def iniciones previa a VAR 


HpRED (X); 


Función que calcula el predecesor de un dato ordinal 


Cuerpo del programa 


SÜCC (X); 


Función que calcula el sucesor de un dato de tipo 
ordinal 


Cuerpo del programa 


ORD(X); 


Función que calcula el número de orden de un dato 
de tipo ordinal 


Cuerpo del programa 


CHR(I); 


Función que calcula el carácter correspondiente 
al número ordinal 1 


Cuerpo del programa 


ARRAY [<tipQ índice>] OF <íipo ba$e>; 


Definición del tipo matriz 


Zona de definición de tipos con TYPE 


SET OF <tipo2>; 


Definición del tipo conjunto 


Zona de definición de tipos con TYPE 


<conj>*<conj.> 


Operación de intersección de conjuntos 


Cuerpo del programa 


<conj>+<conj> 


Operación de unión de conjuntos 


Cuerpo del programa 


<conj>-<conj.> 


Operación de diferencia de conjuntos 


Cuerpo def programa 


<elem> IN <conj> 


Relación de pertenencia o inclusión en un conjunto 


Cuerpo del programa 


<conj><-<conj> 


Relación de inclusión entre conjuntos 


Cuerpo del programa 


NOTA: <id.>, <id.1> <id.n>: identifica dores válidos PASCAL <lista>: lista de parámetros formales. <tipo>: cualquier tipo de datos. <tipo1>: lipo de dato no estructurado. <cte.>: 

constante de cualquier Upo excepto REAL (X): dato de tipo ordinal. (1): número natural. Ctipo índice>: cualquier tipo ordinal, excepto INTEGER. <tipo base>: cualquier tipo de dato 
incluso otro estructurado. <tipo2>: tipo do dato escalar o subrango, excepto REAL Cconj >: conjunto de un SET. <efem>: elemento de un SET. 



elementos que forman parte de dicho 
conjunto. Por lo tanto, habré tantos po- 
sibles valores como resulte de elevar la 
base 2 a la potencia coincidente con el 
número de objetos que componen el co- 
junto. 

El aspecto general de una definición 
del tipo conjunto viene dada por: 

TYPE <identif¡cador>" SET ÜF Ctipo base>; 

Por ejemplo: 

TYPE numero= SET 0F0..9; 
pal abra =$ET OF CHAR; 

El <tipo base> puede ser de cualquier 
tipo escalar o subrango, excepto de tipo 
REAL. Como siempre, la definición de 
tipo no declara la variable, por lo que 
ésta debe declararse aparte, o bien di- 
rectamente: 

TYPE colü res=| roj o r ve rd e, a zu [ a ma r i 1 1 o,b I a neo, neg ro); 

VAR cuadro: SET OF colores; 
cuadrc2; SET OF (rojo/verde.azul); 



Cada elemento de tipo SET se referen- 
cia por medio de un subrango de valo- 
res: [1 .5], o bien por un subconjunto de 
esos valores separados por comas: 
[1,2, 3, 4, 5]. Para no complicar en exceso 
el cálculo de valores por parte del com- 
pilador, ni ocupar excesiva memoria, y 
debido al uso esporádico de este tipo de 
datos, se suele limitar el número de ele- 
mentos del conjunto. Un valor típico se 
concreta en un máximo de 64 elemen- 
tos. 

Para este tipo de datos existen una se- 
rie de operadores específicos. Estos rea- 
lizan las operaciones básicas entre con- 
juntos definidas por Ja teoría matemáti- 
ca moderna. Así, para la unión de con- 
juntos se emplea el símbolo #+», para la 
intersección el símbolo «*», y para la di- 
ferencia el símbolo «-». Las siguientes 
operaciones darán como resultado el 
que se indica: 

[azu I , roj o]+[rojo, verd e]=[az u I, rajo, verde] 

[azu I , roj o j *[rojü,verde]=[roj o] 

[azu í, rojpHrojo, verde]=[a z u I] 



Además de los operadores definidos, 
se pueden aplicar a elementos de tipo 
SET los operadores de relación ya cono- 
cidos: =, <>, <= >= Estos últimos da- 
rán como resultado un valor lógico 
TRUE o FALSE. 

Los operadores: '<=Y>' no tienen el 
sentido de comprobar si un conjunto es 
mayor o menor que otro, ya que ello es 
absurdo, sino que tienen la función de 
comprobar si un conjunto está o no in- 
cluido en otro. Así, por ejemplo; la ex- 
presión lógica [verde]<=[azul, verde], 
dará como resultado TRUE af ser eva- 
luada. Para comprobar la pertenencia o 
inclusión de conjuntos existe un opera- 
dor específico. Este es el operador bina- 
rio «IN», que obtiene un resultado de tipo 
lógico (TRUE o FALSE). Así, ía expre- 
sión: [verde] 1N [rojo, azul] adoptará el 
valor FALSE, mientras que: [verde] IN 
[rojo,verde] será TRUE. 

Los tipos RECORD y FILE, por su im- 
portancia, se estudiarán con más deta- 
lle y detenimiento en el próximo capítu- 
lo de la obra. 
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El tipo RECORD (registro) permite crear una estructura con vanas « campos » o 
componentes que pueden ser de muy diversos tipos. 



nalizadas ya las 
ventajas de la es- 
tructuración de 
los datos y estu- 
diados los dos pri- 
meros tipos de datos estructurados 

— matrices y conjuntos (ARRAY y 
SET) — , sólo nos quedan por examinar 
los dos últimos tipos: registros y archi- 
vos o ficheros, El tipo registro (RECORD) 
es el más flexible de todos, ya que per- 
mite reunir datos de cualquier otro tipo, 
incluso nuevos registros, dentro de una 
misma estructura. La denominación de 
«registro» está presente con harta fre- 
cuencia en la vida cotidiana, dentro de 
frases como: registro de empleados, ofi- 
cina de registros, registro de la propie- 
dad..., lo que da una idea de su gran uti- 
lidad. 

En PASCAL, el concepto de registro se 
refiere a un conjunto de informaciones 
relativas a un único objeto, que pueden 
ser utilizadas como un «todo agrupado», 
o referencíando a sus partes individual- 
mente, Estas partes, denominadas cam- 
pos , mantienen una cierta independen- 
cia unas respecto a otras. Jo que permi- 
te su diferenciación clara en tipo y con- 
tenido. A título de ejemplo, se puede 
pensar en la información reflejada en 
un carnet de identidad que constituye, 
por sí mismo, un «registro» con la iden- 
tidad de una persona: 

— Número de orden 

— Nombre 

— Apellidos 

— Lugar de nacimiento 

— Fecha de nacimiento 

— Nombres de los padres 

— Estado civil 

— Profesión 

— Domicilio 

— Grupo sanguíneo 

Este registro, que da lugar al carnet 
de identidad de una persona, está inte- 
grado por 10 campos; cada uno de ellos 
puede contener informaciones cuyo tipo 
difiere de la incluida en los restantes 
campos. 

Obviamente, el tipo de información 
que se almacene en el campo del nom- 
bre del sujeto no tendrá ninguna seme- 
janza con el contenido del campo de la 
fecha de nacimiento. Este último estará 



compuesto, a su vez, por otros tres da- 
tos que indicarán el día, el mes y el año, 
mientras que aquél contendrá simple- 
mente una cadena de caracteres. Esta 
es una de las principales diferencias del 
tipo registro (RECORD) respecto al tipo 
ARRAY La otra diferencia importante 
reside en que mientras en una matriz o 
array cada uno de los elementos se re- 
ferencian por un subíndice, en los regis- 
tros se hace referencia a sus elementos 
por el nombre de los campos que lo in- 
tegran. 

Un poco más formalmente, se puede 
definir un registro en PASCAL como una 



colección de un número fijo de compo- 
nentes denominados «campos», estando 
cada campo definido por un identifica- 
dor y su tipo de dato correspondiente 
(tipo que puede ser distinto para cada 
campo). La definición de un dato de tipo 
registro se realiza de la siguiente forma: 

TYPE <identíficador>=RECORD 
Clista de campos> 

END; 

Donde la lista de campos estará com- 
puesta por un número finito de identífi- 
cadores de campo, seguidos por el tipo 



TYPE complejos = RECORD 

+ j 



PARTE 

REAL 



PARTE 
IMAGINARIA 



END; 



Las estructuras de tipo RECORD resultan de gran avoca en múltiples situaciones; 
por ejemplo, cuando hay que trabajar con números complejos 
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Los registros vanantes acomodan eí número y el tipo de sus campos a las 
circunstancias actuales, al igual que un camaleón acomoda 
$u color al del terreno que lo circunda. 



de cada campo —éste puede ser cual- 
quier tipo estándar o definido con ante- 
rioridad—, y separados por el signo de 
punto y coma Esta es, ni más ni menos, 
la estructura genérica: 

Cidentificadcr campo 1>:<tipo>; 
identificador campo 2>:<tipo>; 

identificador campo n>:<tipo>; 

Veamos un ejemplo: 

TYPE fecha= RECORD 
día: (1 ..31); 

mes: (ENE, FEB, ¡MAR, ABR, MAY, 

JUM, JUL, AGO, SEP, OCT, NOV, 

DIC); 

año: (1900.. 2000} 

END; 

TYPE complejos=RECORD 
parterealrREAL; 
parteimag:REAL 
END; 



Seleccionando los campos 

Como ya se ha mencionado, los ele- 
mentos de un registro se referencian 
mediante ef identificador de los campos, 
a través def llamado selector de campo. 
Este no consiste más que en el identifi- 
cador de la variable RÉCORD seguido 
por un punto y por el identificador del 
campo. 

Un registro puede utilizarse tanto en 
definiciones de tipo como en declaracio- 
nes de variables; así, si se declara la va- 
riable «fechanacim» como del tipo «fe- 
cha» (definido en el ejemplo anterior) 
mediante la correspondiente sentencia 
VAR, se podrá hacer referencia a sus 
campos respectivos mediante los si- 
guientes selectores de campos: 

fechanacim.día 
fechanacim. mes 
fecha nací m. año 



más se puede hacer referencia al regis- 
tro en bloque, ya sea dentro de senten- 
cias de asignación, como argumento de 
funciones, etc. Veamos el siguiente 
ejemplo: 

TYPE complejos -RECORD 
parte real: REAL; 
paneimag:REAL 
END; 

VAR reactancia: complejos; 

inductancia:complejos; 

BEGIN 

recta nc i a .pa rte rea J ;=0; 
reactancia. parteimag:N); 
induct3nci3:=reactancia; 

END, 

La última sentencia de asignación co- 
piará en su integridad el registro «reac- 
tancia» en el registro «inductancia». El 
efecto sería el mismo sí se tratara de re- 
gistros con mayor número de campos y 
con los tipos de los campos más com- 
plicados (estructurados). 

Una sentencia que ayuda a manejar 
los registros es WITH, cuyo formato es 
el siguiente: 

WITH <variable registro> DO <semencia>; 

Con ella se puede omitir el identifica- 
dor del registro, indicando únicamente 
el identificador del campo que se desea 
seleccionar. De esta forma se abreviará 
sustancialmente la escritura de un pro- 
grama, como puede observarse en el si- 
guiente ejemplo: 

WITH reactancia DO 
BEGIN 

partereal:=4; 
parteimag:= -3.9; 

modu¡t>:=SQRT(SQR(partereal)+SQR(pariei- 

mag|j; 

WRITELN(moduío) 

END; 

La sentencia WITH sirve de gran ayu- 
da en el caso de tener registros de es- 
tructura compleja, en los que alguno de 
sus campos sean a su vez nuevos regis- 
tros (registros jerarquizados). 

Registros variantes 

La estructura de las variables ordina- 
rias de tipo registro es bastante rígida; 



Las palabras «fecha» y «complejos» 
son los identificadores de los registros 
definidos, mientras que «día», «mes», 
«partereal», etc,, son los identificadores 
de los campos. 



De esta forma, cualquier campo de un 
registro puede ser utilizado como si se 
tratara (de hecho lo es) de una variable 
normal. Pero no sólo se pueden utilizar 
los campos por separado, sino que ade- 
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TYPE iBATALLONl FILE OF soldados; 



■I El tipo FILE I fichero ) consta de una sucesión 
E de componentes del mismo tipo. 




I 



La variable «buffer» de un 
fichero se utiliza a modo 
de « ventana » a través de 
la cual se puede leer o 
escribir un elemento del 
fichero. 



de tal forma que todos los registros de 
un mismo tipo tendrán el mismo núme- 
ro de campos, con los mismos nombres 
y con los mismos tipos. 

En muchos casos puede ser conve- 
niente hacer que esta estructura resul- 
te un poco más moldeadle, con objeto 
de adecuarla a las posibles variaciones 
de los datos en cuanto al número y tipo 
de los campos. Esto se consigue me- 
diante los llamados registros variantes, 
cuyo método de definición es el siguien- 
te: 

TYPE <ide n tif i cador>=R ECO R D 
<campo1 >:<tipo>; 

<ca mpo2>:<tipo>; 

CASE <eampo distintivo^ 

<tipo> OF 

<valor1 >:(<id,ÍXtipo>; 

<idX;<tipo>;...) 

<valor2>:(<id .1>:<tipo>; 

<id.2>:<tipo>;4 

END; 

Por ejemplo: 

TYPE da tos= RECORD 

nombre, apelt , apel2:PACK£D 
ARRAY [1-20] OF CHAR; 
nacirn fecha; 

nacionalidad:(ESPAÑOLA r 

EXTRANJERA); 

CASE civil :(S0LTERÜ, 

CASADO) OF 

SOLTE R 0 :( no vi a : B 0 LEAN ); 
CASADO:(boda:fecha;mujer 
ARRAY[1 .20] OF CHAR) 



END, 

El denominado «campo distintivo» ac- 
túa como seleccionador de la sentencia 
CASE, la cual determina el número y 
tipo de campos requeridos en cada cir- 
cunstancia según su valor actual; ello 
proporciona una mayor flexibilidad a los 
datos de tipo RECORD. 



Los archivos de datos 

En muchas ocasiones resulta útil dis- 
poner de medios para crear un conjunto 
de datos que pueda ser utilizado en otro 
momento por el mismo ordenador, o in- 



cluso por otro ordenador diferente. Este 
conjunto de datos se suele almacenar 
en los llamados «archivos» o «ficheros»: 
estructuras formadas por una secuencia 
de componentes, todos del mismo tipo, 
de forma que sólo se puede acceder a 
un único componente del mismo en un 
momento dado. El acceso a un elemen- 
to se efectúa recorriendo previamente y 
en secuencia los restantes elementos 
que estén por delante del afectado. Lo 
indicado equivale a trabajar con una es- 
tructura secuencial en la que importa el 
lugar físico en el que se almacenan los 
componentes y que, generalmente, será 



una memoria de masa externa (cinta 
magnética o disco) 

Al hablar de los ficheros estándar de 
entrada y salida, se comentó la forma 
general de definir las variables de tipo 
fichero. Esta era, como se recordará 

TYPE <ide ntif icador>=FI LE OF <tipo de los elementos>; 

Por ejemplo: 

VAR numeros-FILE OF complejos; 

En donde el tipo de los elementos 
puede ser cualquiera, incluso un tipo 
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V 



y 



El procedimiento GET extrae, uno a uno . ios sucesivos 
elementos de una variable de tipo fichero. 



estructurado que haya sido previamen- 
te definido. Las variables de tipo fichero 
se pueden utilizar como parámetros de 
procedimientos, pero no en sentencias 
de asignación ni de otro tipo. Para faci- 
litar el manejo de los ficheros existen 
una serie de procedimientos estándar 
definidos previamente por ef compilador 
de PASCAL. 

Uno de estos procedimientos es el que 
tiene por sentencia de llamada: RESET 
(<identificador de fichero>}_ Su misión 
es preparar ef fichero para que pueda 
ser leído. La lectura podrá realizarse en- 
tonces mediante la ya conocida senten- 
cia READ«identificador de fichero>,x)_ 
El valor contenido en la componente ac- 
tuaf del fichero pasa a almacenarse en 
fa variable auxiliar <*x»; ésta debe ser, 
por tanto, del mismo tipo que las com- 
ponentes del fichero. El valor de dicha 
componente estará ahora disponible en 
ía variable «x» para utilizarlo en la for- 
ma que se desee. Para acceder a la si- 
guiente componente se empleará una 
nueva sentencia READ, y así sucesiva- 



mente hasta que se llegue a la última 
componente deí fichero, en cuyo caso, 
una nueva lectura con READ producirá 
un error debido a que no existen más 
componentes. La condición de fin de fi- 
chero se puede examinar previamente, 
para evitar estos errores, mediante otro 
procedimiento estándar, cuya sentencia 
de Jfamada es EOF «identificador de fi- 
chero>). Este procedimiento devuelve el 
valor booleado TRUE si se ha llegado al 
final del fichero; de lo contrario, ef va- 
lor devuelto será FALSE. 

La lectura de todas las componentes 
del fichero «números», previamente de- 
clarado, se puede programar de la si- 
guiente forma: 

WHILF NOT EQFfnumeros) DO 
BEGIN 

FtEAD( numerosa); 

END; 

Para intcializar la escritura de datos 
en un fichero se dispone del procedi- 



miento REWRITE «identificador de fi- 
chero>); cuya misión es sustituir el fi- 
chero indicado por un nuevo fichero va- 
cío y posicionarse en la primera compo- 
nente. La escritura se realizará enton- 
ces mediante una sentencia WRÍTE 
«identificador de fichero>,x); habiendo 
asignado previamente a Ea variable au- 
xiliar «x» ef valor que se quiere introdu- 
cir en la componente actual del fichero. 
Así, sucesivamente, se irán almacenan- 
do todas Jas componentes de! mismo. 

Para los ficheros de texto existe un 
procedimiento que indica cuando se ha 
alcanzado el final de una línea; éste se 
activa mediante fa llamada EOLN 
(<identificador de fichero>) y devuelve 
un valor de tipo booleano de forma si- 
milar al procedimiento EOF. La declara- 
ción de cada variable de tipo fichero crea 
automáticamente una variable auxiliar 
denominada «buffer», con cabida para 
un único valor del mismo tipo que fas 
componentes del fichero; ésta variable 
se utiliza como «intermediaria» en la lec- 
tura y escritura de valores. 

La variable auxiliar «buffer» está a dis- 
posición del programador en cualquier 
momento, apelando ai identificador: 
<nombre dei fichero>T. 

Así, en el ejemplo def fichero «núme- 
ros», creado anteriormente, la variable 
«buffer» se referenciará por medio de: 
números f Esta variable también es uti- 
lizada por otros dos procedimientos es- 
tándar: GET «identificador de fichero>) 
y PUT (<identificador de fichero>) que 
constituyen otra forma de actualizar las 
componentes def fichero. Así, GET ob- 
tiene el valor de la siguiente componen- 
te y fo almacena en la variable buffer 
del fichero, mientras que PUT traslada 
el valor del buffer a la componente ac- 
tual del fichero; lógicamente, ello sólo 
tendrá sentido cuando EOF sea TRUE, 
debido a la estructura secuencia I del 
tipo fichero. 



Datos «empaquetados» 



La importancia e indudable utilidad 
del tipo registro (RECORD) estudiado, da 
pie a describir una serie de conceptos 
relacionados más o menos directamen- 
te con el mismo. Por ejemplo, la forma 
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■ PUT es el procedimiento PASCAL que realiza la función contraria a GET; esto es. 
introduce un nuevo elemento en la última posición del fichero. 



en que se aprovecha la memoria inter- 
na que brinda el ordenador no es un 
tema relacionado directamente con len- 
guajes de alto nivel si bien, cobra cier- 
ta importancia cuando éstos son capa- 
ces de influir en ella. 

El elemento básico de información de 
cara a su tratamiento por parte del or- 
denador y a su almacenamiento en me- 
moria, es la palabra binaria. Cada una 
de estas palabras representará a un 
dato de tipo simple (número, carácter, 
valor lógico...} y ocupará una de las po- 
siciones o celdas de la memoria inter- 
na. Como quiera que lo habitual es tra- 
bajar con palabras binarias de 8 bits, 
cada una de dichas celdas estará inte- 
grada por ocho casillas o elementos de 
memoria. Esta forma de almacenamien- 
to se denomina desempaquetada (UN- 
PACKED), y constituye el método más 
natural de guardar la información. 

Cada dato ocupará, en consecuencia, 
una posición de memoria. Sin embargo, 
sí en una posición de memoria (integra- 
da por ocho celdillas de bit) es posible 
almacenar, por ejemplo, datos numéri- 
cos de hasta cinco cifras, no cabe duda 
que al almacenar un dato con tan sólo 
dos cifras se estará desaprovechando el 
espacio de memoria. Si esa información 



se pudiese «empaquetar» de alguna for- 
ma, aumentaría el rendimiento de la 
máquina. 

El PASCAL permite dicho empaqueta- 
do de la información mediante el atribu- 
to PACKED, aplicable a las estructuras 
RECORD y ARRAY: 

TYPE fecha=PACKED RECORD 
día: L. 31; 
mes:1 ..1 2; 



año:G..2Ü0Q 

END; 

tira=PACKEDARRAY[V.15] 

QF CHAR; 

VAR hoy:fecha; 
nombre;tira; 

Así, por ejemplo, en la variable «hoy» 
el número correspondiente al día se em- 
paquetará junto con el número del mes 
en una sola palabra. A su vez, en otra 
palabra se guardará el número del año. 
De esta forma tan sólo' son necesarias 
dos palabras, mientras que si el alma- 
cenamiento se realizara en modo de- 
sempaquetado se necesitarían tres pa- 
labras: una para cada uno de los núme- 
ros correspondientes al día, al mes y al 
año Para registros con campos más 
complicados, el compilador de PASCAL 
se encarga de realizar el empaqueta- 
miento de los mismos de la forma más 
eficaz. 



Cadenas de caracteres (strings) 

Un tipo de dato utilizado con harta fre- 
cuencia en los programas es el «string» 
o «cadena de caracteres». Este se define 
como una matriz empaquetada de carac- 
teres de la forma que se indica en el 
ejemplo anterior. Su uso permitirá ma- 
nejar una secuencia de caracteres que 
representen, por ejemplo, nombres de 
personas u objetos, ya que como se re- 




Et atributo PACKED permite un mejor aprovechamiento de ta memoria ai 
«empaquetar» ios datos de la forma más conveniente a cada caso 



111 




VAR NOMBRE = ARRAY [1 20] OF CHARj 



NOMBRE : = ’ FRANCISCO 1 



:J - " lunlt> ><* definición de un tipo AHHAt ,/,• ,,s ,„***.. munejai con 

comodidad y eficacia las denominadas cadenas de caracteres o stnngs». 



Mediante la definición de los registros 
adecuados con algún campo de tipo 
puntero, será posible crear listas enca- 
denadas de datos con carácter dinámico 
que, evidentemente, potenciarán el ren- 
dimiento del ordenador. 



PASCAL: el lenguaje de los 80. 
Repasando conceptos. 



cordará Jas variables de tipo CHAR sólo 
podían almacenar un único carácter. 

Una de las operaciones más frecuen- 
tes con este tipo de datos es Ja de cla- 
sificarlos por orden alfabético; para ello 
se pueden utilizar los operadores lógi- 
cos de relación: <>,= <>, <=,>=_ Una 
ventaja de las cadenas de caracteres es 
que permiten asignar un valor a todos 
sus elementos simultáneamente, ob- 
viando la necesidad de realizar esta 
asignación carácter por carácter. Una li- 
mitación al respecto es que el número 
de caracteres debe coincidir con el ta- 
maño declarado para la cadena, no será 
posíbJe realizar la asignación desde el 
exterior mediante una sentencia de tipo 
READ. En tal caso, será necesario ha- 
cerlo carácter a carácter, por ejemplo, 
mediante bucles FOR, No obstante, sí 
será posible proyectar una cadena com- 
pleta al exterior mediante la correspon- 
diente sentencia WRITE, siendo el tama- 
ño del campo del formato de salida igual 
al tamaño de Ja cadena de caracteres a 
extraer. 



Punteros 

El lenguaje PASCAL posee un tipo de 
variables denominadas «punteros» o 
^apuntadores» (PÜ1NTERS), cuya misión 
es almacenar la dirección de memoria 
de un determinado dato. Con su colabo- 
ración es posible enlazar ios datos de 
forma que la cantidad de memoria ocu- 
pada por un determinado conjunto de 
datos sea únicamente la imprescindible, 
ni más ni menos. Esta característica se 
conoce como estructura dinámica de da- 
tos. Existen procedimientos que permi- 
ten enlazar unos datos con otros, borrar- 
los o adicionarlos; y todo ello sin nece- 
sidad de volver a reorganizar toda la es- 
tructura ni definir previamente el tama- 



ño necesario, como ocurriría con fas va- 
riables de tipo ARRAY, en el caso que 
se pretendiera utilizarlas para producir 
un número de elementos no determina- 
do de antemano. 

Las variables de tipo puntero se defi- 
nen de la siguiente forma: 

TYPE <identificadür>: * <típo>; 

siendo el signo el que diferencia a 
este tipo de dato, y <típo> el parámetro 
que señala el tipo de datos a los que 
apuntarán estas variables (puede ser 
cualquier tipo, incluso estructurado). 

Para inicialízar la variable puntero y 
reservar así espacio de memoria para la 
primera variable, se dispone del proce- 
dimiento: NEW (<variable apunta- 
dor^; 

La operación contraria corre a cargo 
del procedimiento: DISPOSE (CvariabJe 
apuntador>); 

Para acceder a la posición reservada 
se hace uso de la notación siguiente: 
<variable apuntador>; " para pasar a la 
posición siguiente se ejecutará un nue- 
vo NEW. Si se desea que la variable 
puntero no señale a ningún elemento, 
habrá que asignar a ésta el valor MIL. 



Como habrá podido comprobarse, el 
PASCAL es un lenguaje de programa- 
ción muy atractivo y elaborado. Actual- 
mente cuenta con una gran difusión, so- 
bre todo en las esferas de la enseñan- 
za, debido a que en un principio nació 
como un lenguaje con fines educativos. 
Por esta misma razón presenta ciertas 
limitaciones que lo alejan de ser un len- 
guaje idóneo para ciertas categorías de 
aplicaciones muy específicas. La filoso- 
fía del PASCAL se resume en el objeti- 
vo de conseguir que la programación se 
convierta en una tarea muy sencilla y 
sistemática, de forma que la creación de 
programas se pueda realizar poniendo 
en práctica métodos muy sencillos de 
comprender y recordar. Es por ello que 
el repertorio de instrucciones def PAS- 
CAL no es tan exhaustivo como puede 
ser el de otros lenguajes, como el BA- 
SIC o el LOGO; no obstante, estos últi- 
mos oponen a su naturaleza de lengua- 
jes aptos para un mayor número de apli- 
caciones, una superior complejidad en 
la codificación de los programas. A pe- 
sar de todo, el PASCAL cuenta en nues- 
tros días con una gran aceptación, in- 
cluso en el marco de la creación de soft- 
ware profesional. 




■ ios punteros señalan a una posición de memoria que 
contiene un dato de interés para el programa. 
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■-5.A DE COMANDOS-PASCAL (1) 


Comando 


Cometido 


Observaciones 


TYPE <id.>=RECORD<l¡sta> END: 


X - cor. del tipo registro 


Zona de declaraciones y definiciones 


<íd.1>:<tipo>; Cid n>:<tipo>; 


Z=r ~ : de los campos de un registro (lista de campos) 


Zona de declaraciones y definiciones 


< i d . re g i stro>.< id . ca m po>; 


Se rr:- oe campos del registro 


Cuerpo del programa 


WITH <var> DO <sent>; 


ca campos sin utilizar el identificador del registro 


Cuerpo del programa 


TYPE <id.>=RLE OF <tipo>; 


3r - :ór bel i do fichero 


Zona de declaraciones y definiciones 


RESET «fichero»; 


: = is" che ro para lectura 


Cuerpo del programa 


EOF (<FICHER0>); 


tre zaocr dei fin de fichero 


Cuerpo del programa 


REWRITE «fichero»; 


Jrvicialnar fichero para escritura 


Cuerpo del programa 


EOLN «fichero»; 


indicador de fin de línea 


Cuerpo del programa 


<fichero>T; 


Variable «buffer» de un fichero 


Cuerpo del programa 


PUT (<fichero»; 


Traslado al fichero de la variable «buffer» 


Cuerpo del programa 


GET «fichero»; 


Traslado a la variable «buffer» de la componente actual 
del fichero 


Cuerpo del programa 


TYPE <id>=PACRED <t¡po>; 


Empaquetamiento de los datos para optimización 
de la memoria 


Definición de los tipos: RECORD o ARRAY 


TYPE <¡d>-RECORD. . . CASE<dis>0F<lis1a 1 >; 


Definición de registro variante 


Zona de declaraciones y definiciones 


TYPE <íd>=Xtipo>; 


Definición del tipo puntero 


Zona de declaraciones y definiciones 


NEW «puní.»; 


Inicialización de un puntero 


Procedimiento estándar 


DISPOSE Kpunt»; 


Eliminación de un puntero 


Procedimiento estándar 


NOTA: <id.>: identif icador uáfido PASCAL <IEsta>: lisia de campos. <tipo>: cualquier tipo de datos, incluso estructurado. <var.>: variable tipo registro. <sent>: semencia simple o 
compuesta. <fichero>: identificador de una variable tipo fichero. <dist>: campo distintivo como selector del CASE. <lista1>: lista de los valores del CASE que indiquen los campos 
en cada caso. <punt.>: variable de tipo puntero. 



La principal característica, y a Ja vez 
el mayor éxito del PASCAL, reside en su 
naturaleza de lenguaje estructurado, 
tanto por lo que respecta al programa 
como a los datos. Esto hace que la le- 
gibilidad y flexibilidad de modificación 
de los programas en PASCAL sea, con 
mucha diferencia, superior a la de otros 
lenguajes no estructurados. También 
contribuye a esta sencillez y claridad el 
formato libre de escritura de los progra- 
mas. Así, con un simple vistazo será po- 
sible comprender fácilmente la misión 
encomendada al programa, y conocer 
qué funciones realizan cada una de sus 
zonas; no hay que olvidar que otra de 
las características importantes del PAS- 
CAL es su medularidad, esto es: un pro- 
grama en PASCAL se puede dividir en 
pequeños módulos o segmentos más fá- 
ciles de manejar y comprender. 

También se puede considerar como 
una peculiaridad el hecho de que un 
programa fuente escrito en PASCAL 
siempre debe ser traducido por medio de 



un compilador, y no a través de un in- 
térprete. La compilación creará el deno- 
minado programa objeto, escrito en len- 
guaje máquina, que podrá ser ejecutado 
directamente siempre que no evidencie 
ningún tipo de error. 

El hecho de tener que someterse a un 
proceso de compilación hace que resul- 
te obligada la declaración de variables 
y demás elementos que vayan a ser 
utilizados posteriormente en el progra- 
ma; de esta forma, el compilador reser- 
vará el espacio de memoria necesario 
para dichas variables, lo que garanti- 
zará el correcto funcionamiento del pro- 
grama. 

Las últimas tendencias en las técni- 
cas de programación $e ven reflejadas 
en el PASCAL; un lenguaje relativa- 
mente moderno. Así, por ejemplo, se 
presta una gran atención a la estructu- 
ra de los datos y a su definición abstrac- 
ta; como se señaló al principio, ello con- 
tribuye a la legibilidad del programa y 
facilita la explotación de la componente 



dinámica de éstos. La manipulación de 
los datos se ve favorecida, además, por 
su diferenciación en «tipos», lo que per- 
mite la detección de errores difíciles de 
descubrir de otro modo. 

Los tipos de datos, clasif ¡cables en es- 
tructurados y no estructurados, se defi- 
nen mediante la declaración de tipo 
TYPE. En PASCAL, es posible utilizar 
cuatro tipos de datos escalares están- 
dar: REAL, IMTEGER, BOOLEAN y 
CHAR, todos ellos no estructurados, Los 
tres primeros tipos permiten la manipu- 
lación de datos numéricos y lógicos de 
la forma convencional, mientras que e! 
tipo CHAR está destinado al manejo de 
caracteres alfabéticos, numéricos y sig- 
nos especiales. 

Además de estos tipos, siempre dis- 
ponibles en cualquier compilador, el 
PASCAL permite al usuario la definición 
de sus propios tipos de datos, según dos 
procedimientos: por enumeración de ios 
posibles valores que podrá adoptar una 
variable de tal tipo, y como subrango o 




PROGRAM I NOMBRE I (parámetros); 



DEFINICIONES 



DECLARACIONES 



Y 



BEGIN , 

I CUERPO DEL PROGRAMA I 

END. 



I , ; estructura de un 
I programa PASCAL 
I resulta muy sencilla 
I de aprender y fácil 
j de poner en 
; práctica; lo mismo 
| ocurre con la 
I estructura de sus 
! elementos 
integrantes : 

¡ procedimientos , 
i funciones 



subconjunto de los valores de otro tipo 
previamente definido. 

La posibilidad de estructuración de ios 
datos es la que otorga una nueva dimen- 
sión a este lenguaje. Así, cuenta con los 
siguientes tipos estructurados: ARRAY, 
SET r RECORD y RLE, además de con la 
posibilidad de crear estructuras dinámi- 
cas mediante ef empleo de las variables 
de tipo puntero. 

La declaración de las variables se 
efectúa siempre después de la defini- 
ción de los tipos, y medíante la palabra 
reservada VAR. Las constantes tienen 
también un tratamiento especial en 
PASCAL: se pueden declarar mediante 
la palabra COMST lo que permitirá ha- 
cer referencia a una constante median- 



te un identíficador. Esto ultimo aporta la 
ventaja de que si dicho valor constante 
se quiere modificar en un momento 
dado, sólo habrá que modificar el valor 
asignado a su identificados sin tener 
que tocar el resto del programa; de nue- 
vo sale a relucir el carácter sistemático 
y clarificador del PASCAL. 

Todos los elementos del PASCAL 
mantienen la misma estructura: una ca- 
becera, una zona de declaraciones, y r fi- 
nalmente, el cuerpo principal de sen- 
tencias. 

Incluso un programa completo man- 
tiene esta misma estructura, de tal for- 
ma que cabe considerarlo como un su- 
perprocedimiento, A su vez, cada uno de 
los procedimientos es r realmente, un 



miniprograma con entidad propia. Las 
funciones conservan también esta es- 
tructura. 

En definitiva, la cabecera determina la 
naturaleza de cada elemento, además 
de otorgarle un identíficador y detallar 
los parámetros necesarios para la co- 
municación del mismo con el resto de: 
programa, e incluso con el exterior. La 
zona de declaraciones se encarga de 
compendiar todos los elementos que se 
utilizarán posteriormente en el cuerpo 
principal del programa; esto irá encerra- 
do entre Jas palabras BEGIN y END, Las 
referidas palabras se utilizan también 
para englobar sentencias simples en 
una única sentencia denominada com- 
puesta; de ahí que también pueda con- 
siderarse al propio cuerpo de programa 
como una sentencia única. 

Todo el «peso» del programa recae en 
la zona de declaraciones, en la que se 
definen los procedimientos y funciones: 
éstos son los principales elementos 
para la ejecución de acciones, hasta el 
punto que la mayor parte de las instruc- 
ciones del PASCAL son procedimientos 
o funciones estándar (READ, RESÉ! 
NEW, WRITE, INT, SIIM,.,). 

Realmente, la programación en PAS- 
CAL no resulta tediosa ni aburrida, v 
mucho menos a partir del momento er 
el que se ha llegado a una cierta farm 
liaridad con la práctica. Su empleo crea 
además hábitos de programación muy 
recomendables, eficaces y aplicables a 
otros ámbitos de la informática. 




El proceso de 
compilación de un 
programa puede ser 
lento , y su depuración 
tediosa ; no obstante , la 
ejecución del programa 
objeto (compilado) resulta 
muy rápida. 
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Prolog 



El lenguaje de la 
Quinta Generación 



BASE DE DATOS 



CONJUNTO DE RELACIONES 



CONJUNTO 

DE 

REGLAS 






Un programa escrito en Prolog consta tanto de relaciones como de reglas, , la'Sc 
unas como otras se albergan en una base de datos que mantiene el intérprete 



I nacimiento de: 
Prolog supuso la 
aparición de una 
forma de progra- 
mar que contras- 
taba sobremanera con lo que hasta e 
momento había sido la norma habitual 
en los lenguajes de programación. Le 
programación lógica (el nombre «Prolog 
está formado por las iniciales de ios . : 
cabios franceses «PROgrammalion LC 
Gique») es la nueva herramienta de que 
dispone la ingeniería del software pars 
resolver cierto tipo de problemas que. 
hasta el momento de la llegada del Pro- 
log, eran muy difíciles de representa^ 
La historia de este lenguaje es muy cor 
ta; sus orígenes se remontan al año 
1972 en la universidad de Marsella, en 
el laboratorio de programación de Alain 
Colmerauer. 

Prolog es el máximo exponente de lo 
que es un «lenguaje declarativo». Sin ex- 
cepción, con anterioridad a Prolog, to- 
dos los lenguajes de programación se 
encuadraban dentro de los denomina 
dos «lenguajes imperativos» Un progra- 
ma escrito en un lenguaje de este últi- 
mo tipo (como puede ser el Basic) con- 
tiene una serie de comandos que espe- 
cifican las acciones que hay que tomar 
en cada punto de la ejecución, en un or- 
den rígido y claramente prefijado en 
función de los datos de entrada. La lec- 
tura de uno de estos programas nos pro- 
porciona una información precisa sobre 
la «conducta» del mismo. 

Aunque muchas veces interese cono- 
cer a fondo la forma en la que un pro- 
grama funciona — conocer su conduc- 
ta—, lo normal ante un listado de 1 .000 
líneas en cualquier lenguaje es pregun- 
tarle a su autor: ¿Qué hace este progra- 
ma?, en lugar de: ¿Cómo realiza su ta- 
rea este programa? A esta segunda pre- 
gunta contestaría de maravilla el sim- 
ple listado del programa escrito en un len- 
guaje imperativo como los que conocemos. 

La pregunta «¿qué hace este progra- 
ma?» se debería contestar idealmente 
en términos de los datos de salida pro- 
ducidos por una determinada entrada. 
Lo que interesaría en este caso sería co- 
nocer la relación que liga a la entrada 
con los resultados, así como las relacio- 
nes que sirven de intermediarias entre 
¡a relación básica. 



La novedad que introdujo Prolog, es 
que se trata de un lenguje declarativo 
en el sentido de que los programas es- 
critos en este lenguaje son fundamen- 
talmente definiciones descriptivas de 
una serie de relaciones y funciones que 
hay que manejar. La diferencia entre un 
lenguaje imperativo y uno declarativo 
consiste, para expresarlo en pocas pa- 
labras y de una forma simplista, en que 
con los primeros estamos expresando 
«cómo» hay que resolver eí problema, 
mientras que en un programa de los se- 
gundos se establecen las relaciones que 
expresan «qué» hay que hacer. 



El problema de la sintaxis 

El interés que desde el principio sus- 
citó el lenguaje Prolog entre los inves- 
tigadores de Inteligencia Artificial ha 
sido la causa de la aparición de tres sin- 
taxis ampliamente difundiadas del mis- 



mo: la original de Marsella, la de a ¡Jr - 
versídad de Edimburgo en Escocia / a 
que se encuentra en la implemerzs: 
del lenguaje conocida como «rmcro--':- 
log», del Imperial College de Londres 
Este lenguaje ha sido desarre ad: 
fundamentalmente en Europa, er 
reacción del viejo continente por remar 
una parte activa en los problemas re a 
Inteligencia Artificial que, hasta el ci- 
mento de su aparición, estaban de — a- 
dos por la omn ¡presencia del Lisp re 
origen norteamericano. El impulso 
nitivo puede venir de la mano de pro- 
yecto japonés de la Quinta Generas :* 
de Ordenadores, el cual ha tomar: = 
Prolog como herramienta básica re re- 
bajo. Todavía es algo pronto pa r ¿ re: - 
dír el éxito de este programa, de :_r 
como hemos dicho, depende er co- 
medida el prestigio que el lengua a re 
Marsella sea capaz de adquirir a - .e 
internacional. De cualquier ferrra a r- 
dependientemente de los resu tacos 
prácticos, Prolog ha sido capaz ce ar- 




■ El Prolog almacena los conocimientos relaciónales en forma de árboles etiquetados, en los que cada 
nudo tiene una etiqueta. En la figura se observa cómo es posible representar una igualdad matemática 
y cómo expresar el hecho de que una comida está compuesta por tres platos. 




MUCHAS 

VALVULAS 



MUCHOS 

TRANSISTORES 



VARIOS 
CHIPS MSI 



UN CHIP 
VLSI 



? 



De la válvula a la máquina inteligente en cinco generaciones de ordenadores. 
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■ El ajedrez es uno de los fuegos en los 
que Prolog tendría mucho que decir. 




■ Los componentes fundamentales del Prolog son la base de relaciónales y i es 
comandos básicos para acceder a ella. 



zar definitivamente los principios de la 
programación lógica en los poco más de 
diez años de su existencia. 

La reciente popularización dei Prolog 
ha estado condicionada en gran medida 
por ta aparición de una serie de compi- 
ladores e intérpretes para el lenguaje 
capaces de operar en un entorno de PC, 
o incluso en máquinas tan modestas 
como el Spectrum o el BBC — un orde- 
nador doméstico de gran difusión en ín- 
glaterra— . 

La aparición del micro-Prolog respon- 
de al intento de crear un vehículo de en* 
señanza de la programación y de intro- 
ducción a la informática general, de for- 
ma que el ordenador haga acto de pre- 
sencia en las aulas escolares. Su sinta- 
xis es sin duda la más sencilla y fácil de 
aprender de las tres existentes, por lo 
que será la que aquí adoptemos para 
presentar las bases del lenguaje. Ha de 
quedar bien claro que será difícil reco- 
nocer un programa escrito con la sinta- 
xis de Edimburgo si tan sólo se conoce 
la del micro-Prolog, pero los principios 
de la programación lógica aprendidos 
con ésta ultima son perfectamente apli- 
cables a la primera sin más que cam- 
biar los esquemas de escritura. 



Primeros pasos 

Una implementacíón de Prolog con 3a 
sintaxis de micro-Prolog es, con casi to- 
tal seguridad, interpretada. En realidad, 
lo que se tiene es un intérprete general 
de Prolog sobre el que se «superpone» 
un programa — también escrito en Pro- 
log — que traduce las expresiones te- 
cleadas según la sintaxis de micro-Pro- 
log en otras más acordes con lo que se 
puede denominar un «prolog interno» en 
el que la ejecución es más eficiente. 
Ambos «Profogs» son independientes el 
uno del otro, por lo que el programador 
experimentado es capaz de escribir, 
pongamos por caso, el software necesa- 
rio para convertir a su intérprete de Pro- 
log en otro que trabaje con la sintaxis 
de Edimburgo. 

En Prolog (nos referiremos a menudo 
a «Prolog» queriendo decir «micro-Pro- 
log», es especial en las ocasiones en las 
que se comenten principios generales 
del lenguaje y no particularidades de 
cada sintaxis) el elemento fundamental 



es la existencia de una pequeña base de 
datos en la que se van almacenando los 
hechos y reglas a medida que van sien- 
do introducidos en el sistema. 

El ejemplo más característico del ma- 
nejo de la base de datos en Prolog es el 
de las relaciones familiares, por lo que 
no vamos a ser menos en esta obra y 
empezaremos por describir este tipo de 
relaciones también. En una familia hay 
un buen número de hechos que relacio- 
nan los individuos aislados. Por ejem- 
plo: 

Enrique es el padre de Enripio 
Enrique es el padre de María 



expresan dos relaciones de patarra - 
dad. Jas que hay entre Enrique y sus 
jos Enriquito y María. Estas dos 
son prácticamente un pedazo de ere z~í- 
ma en Prolog. En este lenguaje. una ?or- 
ma de representar hechos esa través :e 
relaciones con tres componentes, a 
estructura es la siguiente: 

<nombre-de-índividuQ> 

<nombre-de-refación> 

<nombre-de-individuo> 

por Jo que las dos relaciones % se 
podrían escribir de la siguiente 'c — a 

Enrique padre-de Enriquito 
Enrique padre-de María 
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La Inteligencia Artificial e$ uno de los aspectos de la informática que más utilización 
hace dei Prolog, como medio de expresión y formalización del conocimiento que 
■ parecen poseer los programas que « presentan » un comportamiento inteligente 



Las relaciones que hemos visto se ca- 
racterizan porque el nombre de la rela- 
ción («padre-de») se encuentra entre los 
términos relacionados. Esta notación se 
llama por tal motivo «infija». También es 
posible encontrar relaciones que liguen 
no sólo a dos elementos, sino a tres o 
más. En tal caso la relación se ha de re- 
presentar en «forma prefija», como es el 
caso de: 

da r( Enrique María el- libro- rojo) 

que expresa la relación que existe entre 
Enrique, María y el libro rojo. El apela- 
tivo de prefija es debido a que el nom- 
bre de la relación precede a los de los 
relacionandos. La adición de esta rela- 
ción a la base de datos se haría ence- 
rrándola a toda ella entre paréntesis, a 
través del correspondiente «add». 

Por último, hay relaciones que invo- 
lucaran a un solo término. Esto es lo 
que ocurre cuando afirmamos que Enri- 
que es varón, lo cual se representa en 
Prolog así (en forma «postfija» por ir el 
nombre de la relación en último lugar): 



Enrique uarón 






Para añadir estas relacionea a la base 
de datos basta encerrarlas entre parén- 
tesis y añadir la palabra «add», de la si- 
guiente forma: 

SuaddfEnrique padre-de Enriquito) 

&.add(Enrique padre-de María) 

Los símbolos «&.» son la indicación 



que hace el intérprete para señalar que 
está esperando una entrada (es algo pa- 
recido al «Ready» del Basic). En Prolog 
los espacios en blanco son separadores, 
de ahí la necesidad de incluir un «-» en 
el nombre de la relación arriba expresa- 
da, ya que de otra forma estaríamos in- 
troduciendo al Prolog una relación que 
involucra a cuatro términos. 



Cualquier relación se puede reducir a 
la forma prefija en Prolog, lo cual es lo 
más habitual. Así, los ejemplos anterio- 
res se escribirían: 

padre-de(Enrique Enriquito) 
padre- defEnrique María) 
darfEnrique María el-libro-rojo) 
varón(Enrique) 




Una de las 
razones para la 
rápida 

popularización 
dei lenguaje 
Prolog ha sido 
la facilidad con 
la que es 
posible 
construir un 
intérprete para 
este lenguaje 
que puede 
aprovechar al 
máximo la 
escasa memoria 
que 

habitualmente 
se encuentra er 
los ordenadores 
personales . 
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I La sintaxis del dialecto de Prolog denominado 

«micro-Proiog» está orientada a hacer más sencilla su 
aplicación en un entorno escolar suavizando la fría y 
analítica sintaxis característica de otros dialectos. 



Consultando la base de datos 

Una vez visto la forma en la que se in- 
troducen relaciones en la base de datos, 
es el momento de recuperar la informa- 
ción almacenada. 

Supongamos que se han introducido 
las siguientes relaciones: 

Si.addfEnrique padre-de Eduardo) 

Si.add(Enriqje padre-de Isabel) 

&.add(l$abel madre-de Enriquito) 
fii.addfAna madre -de Isabel) 

En este momento tenemos en la base 
de datos (también llamada a veces «base 
de relaciones» por razones obvias) cua- 
tro relaciones entre diversos sujetos. 
Para comprobar la existencia de cual- 
quiera de ellas se utiliza un predicado 
basado en «is», como a continuación se 
expresa: 



YES 

La contestación a la pregunta (YES) 
aparece en la línea siguiente a la pre- 
gunta. Si se hubiera dicho «¡s(Enrique 
abuelo-de Enriquito)» la contestación 
hubiera sido «IMO» r por no aparecer de 
forma explícita la relación a la que ha- 
cemos referencia, pese a que a partir de 
estos datos dicha relación se encuentra 
implícita. 

Otra forma de consulta, basada en el 
«which», permite obtener valores con- 
cretos de los relacionandos. Conside- 
rando que el contenido de la base de da- 
tos es el anteriormente señalado, a con- 
tinuación se expresa un acceso típico 
junto con su resultado: 

&.wh¡ch(x : Enrique padre-de x) 

Eduardo 

Isabel 

No (more) answers 
&. 



El argumento del «which» está com- 
puesto por dos partes. En la primera = 
que aparece con anterioridad a los des 
puntos {:), aparecen una serie de var a- 
bles (una en nuestro caso) cuyo cor:e- 
nido ha de ser impreso a medida que se 
vaya recorriendo la base de datos er 
busca de predicados que coincida** 
forma con la pregunta, la segunda ca - 
te de la cláusula «which», que en el :es: 
precedente es «Enrique padre-de x- - 
la vista de un «which», el intérprete re- 
correrá la base de datos buscando 'e s 
clones que sean como la dada, s ierra: 
las variables que aparezcan una eses- 
cíe de «comodines» que van tomarlo: * s- 
lores a medida que progresa la bus:_s- 
da, imprimiéndose a continuador se::: 
valores. Una vez que se ha recc~ :: 
toda la base de datos, aprece el 
je «No (more) answers» para indicar = 
no existencia de nuevos resultados zsss 
mensaje aparecerá siempre que se * 

( ¡ce una exploración de la base es erre 
y, en algunos casos puede ocurrir o^s 



&.is(Enrique padre-de Eduardo) 





Si bien es posible encontrar versiones de Prolog corriendo sobre equipos domésticos : sólo con fa mediación de un ordenador 
r persona f que soporte el sistema operativo MS-DOS es posible lanzarse a fa creación de aplicaciones serias con este lenguaje. 



no se hayan encontrado ningún valor 
para las variables involucradas, de ahí 
el que aparezca entre paréntesis el 
«more*. 

En micro-Prolog, las variables son 
cualquier conjunto de caracteres que 
comiencen por las letras x H y o z. Cuan- 
do hay más de tres variables en un ac- 
ceso a la base de datos, la costumbre es 
añadir un número al final de cada nom- 
bre de variable, de forma que todas que- 
den inequívocamente definidas. 

La parte que aparece a la izquierda de 
los dos puntos se denomina «patrón de 
respuesta». El significado de este norrv 
bre se ve más claro con el siguiente 
ejemplo: 

8i.which(x Jr es la madre de” y : x madre-de y) 



Isabel es la madre de Enriquito 
Ana es la madre de Isabel 
No (more) answers 
&. 

Como ^n el caso anterior, la parte que 
se encuentra a la derecha de los dos 
puntos determina los valores que van 
tomando las variables «x» e «y» a medi- 
da que se recorre la base de datos. La 
parte izquierda de los mismos determi- 
na la forma en la que se han de presen- 
tar los resultados de la búsqueda: pri- 
mero una variable, después un string de 
caracteres y, a continuación, el valor de 
la segunda variable. Es posible insertar 
en este string distintos códigos de con- 
trol que tengan efectos diversos sobre 
el dispositivo impresor. 



Las reglas, principal característica 
del Prolog 

Hemos visto cómo es posible introdu- 
cir una serie de relaciones en la base de 
datos y obtener respuestas sobre la ver- 
dad de ciertas preguntas. Hasta el mo- 
mento, todas las citadas preguntas se 
referían a relaciones que estaban pre- 
sentes explícitamente en la base de he- 
chos, y cualquier pregunta que no fuera 
contrastadle directamente con una de 
tales relaciones daría resultados nega- 
tivos. Sin embargo, ya hemos comenta- 
do que, al introducir relaciones senci- 
llas entre elementos, es posible que 
aparezca alguna relación implícita entre 
ellos, la cual, desgraciadamente, siem- 
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pre sería contestada nega - . 
como acabamos de decir, 

Así ocurre entre las cuair: re ec c^es 
sobre las que han versado os eterno : s 
anteriores, Al establecer que «Ana ma- 
dre-de Isabel» y que «Isabe — azre-ze 
Enriquíto^, se está declararse —c : ¿ 
mente que Ana es la abuela ce Enr z - 
to, pero al preguntar "isíArs ac.e 2 - 
Enriquito)", la respuesta se' a rc:.m- 
do NO. Por otra parte, pensemos ic que 
supondría la necesidad de que 
presar todas y cada una de las zzs b es 
relaciones entre los elementos de una 
base de datos. Por pequeño que fuera 
su tamaño o escaso el número de reía 
cienes, el trabajo pronto se escapa de la 
capacidad humana, A nuestra ayuda 
acuden en tales casos fas regias 

Las reglas se añaden a la base de da- 
tos de igual forma que fas relaciones, a 
través de «add»: 

S.addfx abuela-de y if 
x madre-de 1 and 
1 madre-de yj 

En términos más usuales, la regla an- 
terior expresa el hecho de que si existe 
un «x» que es madre de un «z», y si este 
«z» es a su vez madre de un «y», enton- 
ces «x» resulta ser la abuela del «y». 

Una vez que esta regla ha sido intro- 
ducida en la base de datos, se obtendría 
el resultado esperado a la siguiente pre- 
gunta: 

&.is{Ana abuela-de EnriquitoJ 
YES 

La forma en la que se expresan las re- 





ía rohótica es otro de los campos ze I 
la Inteligencia Artificial en e! que e 
Prolog tiene mucho que apoza~ 



I La comunicación con dispes r\ os 
I periféricos en ia mayoría ce as 
I impiementaciones de Prolog se 
| realiza a través de * streams : 

I canales de comunicación haz - r 
I desde los que se recoge idcb s 
I salida o entrada respea . s~e~ 's z 
I ser seleccionados por defe 







I ta posibilidad de conectar dispositivos periféricos avanzados 
al ordenador y controlarlos desde un programa escrito en 
Prolog, es una facultad que sólo depende del hardware del 
equipo que se esté manejando, 



Como ocurría con las implementaciones del lenguaje Usp i y 
fas de Prolog son igual de ineficientes al ser ejecutadas % 
sobre arquitecturas convencionales de ordenadores . u 
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glas es uno de los puntos que más dis- 
tancian las distintas sintaxis del lengua- 
je Prolog. Concretamente, según la sin- 
taxis de Edimburgo, la misma regla ten- 
dría el siguiente aspecto: 

abuela-de(X,Y):- 

madre-defX.Z), 

madre-deíZ.Y). 

El cual puede provocar no pocos sus- 
tos si no se conoce la particular forma 
de representación. Lo importante es que 
los mismos principios son aplicables en 
cualquiera de los casos. 

Todo programa en Prolog no es sino 
una colección de hechos y de reglas en 
una base de datos común, la cual es 
consultada por el usuario. Por lo tanto, 
con los elementos vistos hasta el mo- 
mento se estaría en disposición de co- 
menzar cualquier proyecto con este len- 



guaje. Sin embargo, otra de las grandes 
habilidades de Prolog reside en la faci- 
lidad con la que se manejan listas, lo 
que abre las puertas a ta manipulación 
de complicadas estructuras de datos. 



Las listas en Prolog 

Una lista no es más que un conjunto 
de palabras encerradas entre paréntesis 
y separadas por espacios en blanco. Por 
ejemplo, la lista (fútbol tenis balonces- 
to) puede representar los deportes prac- 
ticados por alguna persona. Con estos 
elementos, se puede decir: 

&.add(juan practica (fútbol tenis baloncesto)] 

Las relaciones familiares proporcio- 
nan de nuevo buenos ejemplos para ver 



la utilidad de las listas. La siguiente es- 
tructura general: 

(eí-padre la-madre) sen-padres-de (sus hijos) 

da pie para la representación de los si- 
guientes núcleos familiares: 

■.Enrique Berta) son -padres-de (Margarita Carlos) 

(Juan María) son -padres-de (Isabel Pablo Luis) 

(Pepe Marta) son-padres-de () 

(Jóse-Luis Olga) son-padres-de (Teófilo) 

De ellas se desprende que Pepe y 
Marta no tienen hijos, mientras que 
José Luis y Olga tan sólo tienen uno. 

Una vez introducidas las anteriores 
relaciones a través de *add» en muestra 
base de datos, es posible contestar a la 
siguiente pregunta: 
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&.which(x ; (Juan María) so n-pad res-da xj 
(Isabel Pablo Luis) 

No (more) answers 
&. 

Observemos que la respuesta viene 
dada entre paréntesis, indicando que se 
trata de una lista. 

Las listas son un medio conveniente 
para representar la información, como 
hemos podido comprobar en los ejem- 
plos anteriores. A base de listas consti- 
tuidas a su vez por listas es posible re- 
presentar casi cualquier estructura de 
datos que se nos venga a la cabeza, sin 
más que conocer la forma en la que tal 
estructura está dispuesta sobre la lista. 

Para un manejo eficiente y elegante 
de listas, el Prolog distingue entre la 
«cabeza» y la «cola» de las mismas. En 
una lista como «(fútbol tenis balonces- 
to)», «fútbol» es la cabeza, mientras que 
la cola está formada por la lista «(tenis 
baloncesto)». Es muy importante darse 
cuenta de que la cola es siempre una 
lista, mientras que la cabeza puede ser- 
lo o no. En un ejemplo como el anterior, 
la cabeza era un sólo elemento —«fút- 
bol»—, pero en esta otra: 

«a b)cd) 

la cabeza sería «{a b)», mientras que la 
cola estaría formada por «{c d)». 

La forma general de representar las 
cabezas y las colas en Prolog es a tra- 
vés de la barra vertical (|). Por ejemplo, 
al aplicar el patrón (x|y) sobre la lista 
anterior, resultaría en la variable «x» con 
el valor «(a b}» y la «y» con el valor «(c 
d)». Volviendo al ejemplo de las listas de 
padres e hijos, se pueden obtener el pri- 
mer hijo del matrimonio entre Juan y 
María de la siguiente forma: 

&.which(x : (Juan María) padres-de (x|y)) 

Isabel 

no (more) answers 

Este último ejemplo da pie para co- 
mentar el hecho de que a veces se ne- 
cesitan variables con el simple propósi- 
to de albergar ciertos valores tempora- 
les, como es el caso de la «y» en el va- 
lor anterior. Su utilidad estriba en con- 
seguir una pregunta sintácticamente co- 
rrecta, pero su valor no es utilizado para 
nada. Algunos intérpretes permiten utí- 



:zar ía variable «— » (underscore) como 
comodín para estos casos. 

La combinación de la estructura lista 
junto con definiciones recursivas permi- 
ten resolver ciertos problemas de forma 
muy elegante. Tal es el caso que se en- 
cuentra al querer determinar si un ele- 
mento es miembro de una lista, un pro- 
blema muy típico de Prolog y, en gene- 
ral, de cualquier lenguaje de programa- 
ción orientado a listas. Para ello se es- 
tablecerá una relación binaria entre un 
elemento y una lista y una regla, cuyo 
propósito es representar la siguiente 
condición de pertenencia de un elemen- 
to a una lista: 

Un elemento pertenece a la lista 



si el primer elemento de la misma es 
precisamente el elemento buscado. 

2.2 Un elemento pertenecerá a una 
lista si al no coincidir con el primer ele- 
mento de la misma, es miembro de su 
cola. 

Las siguientes relaciones Prolog ex- 
presan las condiciones arriba expues- 
tas: 

&.add(x pertenece- a (x|z)) 

&.add(x pertenece-a fyjz) if 
x pertenece-a z) 

Al preguntar al intérprete de micro- 
Prolog: 

is(1 pertenece-a (1 2 3)) 



Los sistemas expertos 



Otro aspecto al que Prolog se adapta especialmente 
bien es el campo de los Sistemas Expertos. Estos son, 
básicamente, programas capaces de almacenar y 
asimilar el conocimiento que previamente han aquírido 
de un experto humano en un área determinada, para 
que, con posterioridad, otras personas no tan 
especializadas puedan pedir consejo y recibir 
explicaciones del propio programa. Hasta la fecha se 
han construido un buen número de Sistemas Expertos 



que funcionan con mayor o menor fortuna en diversas 
áreas de conocimiento. Destacan por su cantidad v 
calidad ios dedicados a aplicaciones médicas, ccrr.o 
MYCIW, versado en la diagnosis de enfermedades 
infecciosas de ía sangre, y QNCOCIN, experto en eí 
tratamiento de algunos tipos de cáncer. 

Los Sistemas Expertos se enfrentan con problemas de 
representación del conocimiento, de imprecisión en a 
mismo, de comprensión del lenguaje natural cuando 
hacen las preguntas los «no expertos», etc. E: Pro se 
perfila como la herramienta básica para su 
construcción. 



HOY NO ME SIENTO 
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Para resolver el problema de la ineftcienaa del Prolog al ser ejecutado sobre 
arquitecturas convencionales de ordenador se han lanzado vanos proyectos a nivel 
mundial encaminados a la construcción de máquinas cuyas características estén 
más de acuerdo con los principios establecidos en el lenguaje y en las que por 
tanto, el funcionamiento de aplicaciones escritas en Prolog sea más rápido y eficaz. 



Ja respuesta será YES, ya que ha sido 
posible encontrar un hecho en la base 
de datos — «x pertenece-a (x|z)» — que es 
cierto al ser sustituidas las variables del 
mismo con los términos en los que se 
formula la pregunta. Por otra parte, al 
preguntar: 

is(2 pertenece a (1 2 3)) 

ya no se cumple el primero de los he- 
chos, por !o que el Prolog intentará bus- 
car una nueva relación que aplicar. En 
este caso, se encuentra con el enuncia- 
do de una regla (segunda de las relacio- 
nes). Concretamente, intentará demos- 
trar «2 pertenece-a (2 3)*, partiendo de 
nuevo de las dos relaciones de que dis- 
pone en 3a base de datos. En esta oca- 
sión, sí es posible aplicar la primera de 
ellas, por lo que el resultado será de 
nuevo cierto (YES). 

Este tipo de definiciones recursivas 
tienen propiedades muy curiosas, entre 
las cuales la más sobresaliente es la po- 
sibilidad de que funcionen de forma in- 
versa a como se ha visto; es decir, en lu- 
gar de contestar positiva o negativamen- 



te a una pregunta, ser capaces de gene- 
rar los elementos de los que se compo- 
ne la lista forzando el hecho de que se 



desea un resultado cierto. Este tipo de 
utilización de estas definiciones caen 
fuera del ámbito de Jos propósitos de 
esta introducción al Prolog, por lo que 
bastará comentar dicha posibilidad. 



A modo de epílogo 

Con los párrafos anteriores se ha pre- 
tendido dar una visión muy esquemáti- 
ca de los principios del lenguaje Prolog, 
y el estado actual de su desarrollo. La 
base matemática que impregna la cien- 
cia de ios ordenadores tiene un reflejo 
muy persistente en el Prolog, ya que 
este lenguaje se puede considerar como 
una auténtica implementación concreta 
de un tipo determinado de lógica mate- 
mática. 

Como ocurre con el lenguaje Lisp, 
cualquier implementación de Prolog so- 
bre un ordenador convencional es extre- 
madamente ineficiente por el extensivo 
uso que de la estructura lista se hace 
A diferencia de él, la realización de or- 
denadores cuya arquitectura esté espe- 
cialmente diseñada para soportar apli- 
caciones escritas en el lenguaje de Col- 
merauer son sólo proyectos, los cuales 
se están llevando a cabo fundamental- 
mente en el Japón. 



| El acceso a (as características de color del ordenador no está nt mucho menos 
| estandarizado en el lenguaje Prolog. Cada tmpiementaaón concreta ha optado por 
I diversos medios de acceso a las capacidades gráficas de ¡os 
* 'controladores gráficos habituales de los ordenadores . 
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